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CHAPTER 1- INTRODUCTION TO 3100/3200/3300/3500 COMPUTER HARDWARE 



The majority of the programming that will be done for the 
3100/3200/3300/3500 computers will be done with a subset of 
the total instruction repertoire for the particular machine. 
The subset chosen for this manual applies primarily to the 
3100/3200 computers because of the BCD instructions chosen. 
If this chapter were eliminated, what remains applies equally 
to all computers in the series. The 3300/3500 computers in 
addition to having different BCD instructions, have some addi- 
tional features and instructions. These will not be discussed 
here. The student is referred to the appropriate machine 
reference manual for a description of those additions. The 
timing information included in this manual applies to the 3200/ 
3300 computers. 3100 times are about forty percent higher; 
3500 times are at least forty percent lower. Other then in the 
case of timing information and the BCD instructions, the manual 
points out those areas that are specifically 3200, which was 
the machine chosen as representative of those in the series. 




3200 COMPUTER SYSTEM 



STUDENT NOTES 



1.1 3200 HARDWARE 



1.1.1 Diagram of 3200 computer 
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13-bit register, which 

holds the address of 

the word being processed. 

28-bit register, which 
holds the contents of the 
word being processed. 
(Used also to write contents 
of word back into store.) 



1 ,1 .2 Data Bus 

The data bus is the path along which data flows between the 
various sections of the computer. The sections (storage, the arithmetic unit, 
the console typewriter, and the input/output section) are connected in parallel 
to the data bus. During execution of each instruction, program control 
determines which unique path is to be enabled so that the function called 
tor in xhe program instruction can be carried out. 

The data bus contains a 24-bit register called the Data Bus 
Register (DBR) which is used to hold data temporarily during a data transfer. 



1*1.3 Arithmetic Section 

The arithmetic section of the 3200 processor consists of three 
operational registers, namely - 

(i) A - arithmetic register 
(ii) Q - auxiliary arithmetic register 
(iii) E - optional arithmetic register. 

(i) The A Register (Accumulator) 

The A Register is the principal arithmetic register. It is a 
24-bit register, whose contents can be displayed on the console 
of the 3200. 

All arithmetic and logical operations use the A register in 
formulating a result. It is the only register with provision 
for adding its contents to the contents of a storage word or 
another register. 

(ii) The Q Register (Quotient) 

The Q register is an auxiliary register and is generally used 
in conjunction with the A register. It is a 24-bit register, 
whose contents can be displayed on the 3200 console. Combined 
with A it forms a 48-bit register, AQ. Most arithmetic operations 
possible with the A register are also possible with the AQ 
register. The Q register often is used to provide temporary 
storage for the contents of the A register while the A register 
is used for some other operation. 

(iii) The E Register 

This register acts as a supplement to the AQ register. It is 
a 48-bit register, whose contents can be displayed on the 3200 
console, in the display sections usually occupied by A and Q. 
(The upper 24 bits of E - called E„ - are displayed in A, and the 
lower 24 bits of E - called E L - are displayed in Q.) The reg- 
ister is used in 48-bit precision multiplication and division, 
and in floating point multiplication and division. 

In BCD operations, the E register is designated the Eq 
register, and its size is extended to 53 bits, to enable it to 
handle thirteen 4-bit characters, plus a sign bit. 



1.1.4 Program Control 

The program control section contains six operational registers, 
all of which may be displayed on the 3200 console. They are - 

(i) F - program control register 

(ii) P - Program address counter 

(iii) C - Communication register 

(iv) B - Three index registers, B , B , and B 

(i) The F Register 

This 24-bit register is used to hold the instruction 
during the time it is being executed. 

(ii) The P Register 

This 15-bit register holds the address of the instruction currently 
being executed, and generates, in sequence, the storage addresses 
which contain the individual instructions. After execution of an 
instruction, P is altered to indicate the address of the next 
instruction to be read. The address is sent via the S (address) BUS 
to the specified storage module where the instruction is read. 

(iii) The C Register 

The 24-bit C register is used to enter quantities into Storage, 
A, Q, E, B or P registers via the console key board. The quantity 
is entered in C, and then transferred to the specified register 
when the "transfer" button on the keyboard is pushed. 

(iv) The B Registers 

The 15-bit B registers (index registers) are used principally as 
counters and instruction modifiers. 



1.1.5 Block Control 

For a general description of the use of Block Control see 
Section 10.1. 

(i) The Register File 

The register file is a 64 word (24-bits per word) rapid access 
memory with a cycle time 0.5 microseconds. Although the programmer 
can access all registers in the file with the inter-register transfer 
instructions, certain registers are reserved for specific purposes. 
These are defined in the following table: 



1.1*5 (cont.) 



REGISTER 
NUMBER 


RESERVED FOR 


00-07 


Modified I/O instruction word containing the current 
character address (Channel 0-7 control) 


10-17 


Modified I/O instruction word containing the last 
character address plus (or minus) one (Channel 0-7). 


20 


Current character address for search control 


21 


Source address for move control 


22 


Real time clock, current time 


23 


Current character address for typewriter control 


24-27 


Temporary storage 


30 


Last character address + 1 for search control 


31 


Destination address for move control 


32 


Real time clock, time at which to generate interrupt 


33 


Last character address + 1 for typewriter control 


34-77 


Temporary storage 



Because of the fast access time, use of Registers 24-27 and 34-77 
as temporary storage will speed up program execution. Other registers may 
also be used for temporary storage if their use will not disrupt operations 
in progress. 

(ii) The Real Time Clock 

The real time clock is a 24-bit counter that is incremented each 
millisecond. The current time is stored in Register 22. It is removed from 
storage each millisecond, updated, and compared with the contents of Register 
32. when the two are equal, an interrupt condition occurs. 

The clock has a period of 16,777,216 milliseconds (approximately 
4 hours 40 minutes). It starts as soon as power is supplied to the computer. 
Its contents may be examined at any time by transferring them to the A 
register using an inter-register transfer statement. It may be reset to any 24 
bit quantity (including zero) by loading A, and transferring the contents of 
A into Register 22. 



1.1.6 Diagram of 3200 Console Register Display 
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1.2 3200 CORE STORAGE 

1.2.1 Storage Word 

27 26 25 24 23 



18 17 



12 11 



06 05 



00 



Po 


Pi 


< P2 


P3 


Character 


Character 1 
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Character 3 
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Character designators 



The 3200 is a word machine with eaoh word consisting of 28 bits. 
Each word may be regarded as four 6-bit characters as shown above, with 
parity bits for each character located in bits 24-27- 



1.2.2 Word Addressing 

Each word in the storage of the 3200 is addressable. The address of 
a particular word is its relative position in the storage. The first word 
is word 00000, the second is word 00001, the third 00002, etc. The address 
is specified as five octal digits, which may be broken down to indicate the 
actual location of the word in core. 

The 3200 core is composed of modules of 8,192 words each. There may 
be up to four such modules attached to the computer, and the modules are 
numbered from through 3* Thus an 8K 3200 would have only one module, 
numbered 0_ (00 o ), a 16K 3200 would have two modules, 00- and 01 „, and so on. 

Each 8K module is made up of two 4>096 word fields , numbered field 
and field 1 . 



Module 00 


Field 


Field 





1 



Within each field, words may be regarded as numbered from 0000 to 
J.Q96 10 words). The positii 

Co-ordinate address in that field. 



YY77 ft (4096 10 words). The position of a word in a field is known as its 



Thus a 15-bit address 01200 fl may be divided up to indicate its 
position in core as follows: 

bits 00-11 indicate the co-ordinate address (1200 Q ) 

o 

bit 12 indicates the field (0) 
bits 13-14 indicate the module (0) 

Examples : 

Address 31040. - Module 1, field 1, address 1040- 

Address 77777 8 - Module 3, field 1, address 7777 Q 
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2.1 INTRODUCTION TO THE SCOPE MONITOR 

The SCOPE monitor is a program that provides a 
system of operator and programmer aids to increase through-put 
and to simplify the operator's job. 

Its purpose is to increase job processing efficiency 
by increasing information through-put, and to minimize operator 
errors, operator intervention and idle computer time. 



2.1.1 SCOPE Library Tape 

The library tape serves as the source for the SCOPE 
operating system as well as those library routines operat 
under control of SCOPE. The tape consists of two files: 
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Load 
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B: 



FILE 1 



SCOPE 

OPERATING 
SYSTEM 

(6 RECORDS) 



FILE 2 



RELOCATABLE 
BINARY 

SUBPROGRAMS 
(COMPASS, FORTRAN, etc) 



LIBRARY TAPE FORMAT 

The first file consists of absolute binary information 
which, from this point on, will be considered the SCOPE 
operating system. The second file consists of relocatable 
binary subprograms such as COMPASS, FORTRAN, COBOL, etc. 



2.1.2 SCOPE System Terms 
RUN 

The complete execution of a subprogram under the control 
of SCOPE. 

JOB 

The sets of tasks assigned to SCOPE by the programmer. 
A job consists of one or more runs. 

STACKED JOBS 

A stack consists of one or more jobs. The termination of 
a job is signaled by the printout of the SEQUENCE card for the 
next job. 

NON- STACKED JOBS 



A stack which consists of only one job. The presents of 
the "NS" parameter on the job card indicates that this job is 
a non-stacked job. 

The termination of a non-stacked job is signaled by the 
printout of "NORMAL END" or "ABNORMAL END" at which time pro- 
cessing will halt. 



2.1.2 (cont.) 

SUBPROGRAM 



The smallest unit recognized by the SCOPE LOADER. 



LUN 



A two-digit decimal number representing a logical reference 
to a physical I/O unit* 



2.1.3 SCOPE Control Card 

Refer to Chapter 17 



2.1. 4 SCOPE/ COMPASS Run 



AUTOLOAD 




Scope Operating 

System is read 

in from LIB. (LUN 63) 



Control is 
transferred 
to Scope. 



Scope reads from 
the standard input 
unit , and by the 
presence of contro] 
cards is told what 
to do next. 



-0 



0- 



After reading a 
^COMPASS control 
card, SCOPE then 
searches and loads 
the subprogram, 
COMPASS, from the 
2nd file of the 
library tape. 



Control is then 
transferred to the 
subprogram COMPASS 
which, in turn, 
assembles the user's 



subprogram (SOURCE 
DECK) and produces a 
relocatable object 
deck as well as a 
printer listing. 



Control is then 
transferred back to 
SCOPE and SCOPE again 
reads from the stand- 
ard input unit for 
further operating 
instructions. 



<D 




SCOPE/ COMPASS RUN 



2.1.5 SCOPE/Program Execution Run 




Scope Operating 

ystem is read in 
from LIB.(LUN 63) 



Control is 
transferred 
to SCOPE. 



SCOPE reads the 
user's binary object 



program from the 
standard input unit 
into high core and 
then branches (RTJ) 
to the program for 
execution. 




0- 



The very last instruction 
executed in the user's pro- 
gram must be an instruction 
which transfers control 
back to SCOPE, enabling the 
system to continue the pro- 
cessing of various other 
jobs. 



After obtaining control 
from the user' s program, 
SCOPE again reads from 
the standard input unit 
for futher operating 
instructions. 




SCOPE/ PROGRAM EXECUTION RUN 



2.2 INTRODUCTION TO THE COMPASS ASSEMBLY SYSTEM 

(a) COMPASS is the COMP rehensive ASsembly System for use with 
Control Data Computers. 

(b) COMPASS operates under the SCOPE monitor system. 

(c) COMPASS enables the programmer to write machine language 
through the use of mnemonic instructions and symbolic 
addresses. The COMPASS assembler translates these 
instructions and addresses into machine language. 

(d) In COMPASS source language, the programmer is also able 
to specify constants, exercise control over subprogram 
communication and control the assembly process with a 
powerful set of PSEUDO (assembly) instructions. 

(e) A COMPASS program consists of a number of linked subprograms, 
each of which will be assembled independently and linked by 
the LOADER, prior to execution of the program. 

(f) A COMPASS subprogram consists of lines of coding preceded by 
an IDENT pseudo instruction, and followed by an END pseudo 
instruction. The size of the subprogram and the magnitude 
of the problems solved by it are at the discretion of the 
programmer. 



2,2.1 Assembly Process 



(a) 



Assembly language is much closer to machine code than languages 
like FORTRAN and COBOL. A line of FORTRAN coding may generate 
many machine instructions (perhaps in the ratio of 1:10). Most 
COMPASS instructions generate only one machine instruction. 



Example : STA 



C0UNT 



If C0DNT is located at address 174 g » 
this instruction would be assembled as 
40000174 

(b) The assembly process may be represented diagrammatically as 
follows : 

DIAGRAM OF THE ASSEMBLY PROCESS 



COMPASS 

CODING 

WRITTEN 




Note ; (a) The COMPASS assembly program converts programs written in 
COMPASS into machine language for execution under the 
SCOPE monitor system. 

(b) Source programs may be punched on cards or paper tape, 
or written on magnetic tape. 

(c) Out "nut from the assembler includes an assemble listiru 3 " 
and a relocatable binary object deck. The output deck 
may be punched out on cards, or written on a magnetic 
tape for Immediate execution. 



2*2.1 (cont.) 

(d) What does the assembler do? 

(i) Allocates storage locations to instructions and 
to blocks defined in pseudo or area-definition 
instructions. Note use of 1, ORGR". 

(ii) Replaces symbolic addresses with allocated 
storage locations from (i). 

(iii) Replaces symbolic instruction addresses with 
actual instruction addresses from (i). 

(iv) Indicates index register use and/or indirect 

addressing in the relevant bits of the necessary 
instructions. 

(v) Converts mnemonic operation-codes to machine 
language equivalents. 

(vi) Stores literals in a special literal table, after 
checking for any prior use of that literal. 

(vii) Replaces literals in the instructions with the 

addresses of the table locations of the literals. 

(viii) Check for assembly language (source language) errors 
and generates necessary diagnostic messages. 

Most assemblers perform these functions in a number of passes. 
The source program is first written on to tape, at the same time carrying 
out some of the above functions. Then the tape is passed against the 
assembler at least once more to carry out the remainder of the functions. 



2.2.2 General Word Addressing Instruction Format 

The 3200 (24-bit) word addressing instruction takes the 
following general form - 



Bit position 23 



18 17 16 15 14 




Where f » function coae of b bits. 

Range is 00 o through 77 • 
8 8 

This code determines the type of action 

to be carried out. 



e.g. 20 g 
31 



8 



Load the A register. 
Subtract from the A register. 



Addressing mode of 1 bit. 

If this bit is a zero, direct addressing is 

carried out. 

If this bit is a 1 bit, indirect addressing is 

carried out. 

Index designator of 2 bits. 
If b - 00, no index is used 
If b » 01 , index 1 is used 

b - 11, index 3 is used. 

Execution address of 15 bits. 

This is the address in memory at which data 

required for execution will be found. The 

24-bit quantity found at that address will be 

used in a manner determined by the rest of the 

instruction. 



y « Operand of 15 bits. 

This specifies a 15 bit quantity which will 
be used as data in some way. It is the 
actual data , not the address of the data. 

Exercise: Divide up the following octal instructions into their components: 

20400100 
27100000 
56201010 
01322222 
77654321 
46077776 
17500000 
66766766 

Note that the address "m" specified in a word address instruction can be 
divided further to indicate its actual location in storage. 



2.2.3 . COMPASS Source Program - Coding 

The following fields are used on the COMPASS coding sheets and 
on COMPASS punched cards. 



NAME OP 


COLUMNS ON CARD 


FIELD 


OR CODING SHEET 


Location 


1 - 8 


Operation 


10 - 20 


Address 


21 - 40 


Comments 


41 - 72 


Ident if icat ion 


73 - 80 



The use of these fields is discussed following the samples of 
the COMPASS CODING FORM and the COMPASS CARD. 



Instructions in subprograms to be assembled by COMPASS are 
written on coding forms. The information on the coding form 
will be punched into cards or prepared on other suitable media 
for input to COMPASS. Following is a sample COMPASS CODING FORM. 
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COMPASS CODING FORM 
(half-size) 

Each line of the coding form represents one card when punched 
into cards. 



2.2.3 (cont.) 



Following is a sample of the COMPASS CARD. 



/ 



So 



LOCATION 

000000.0 

1 2 3 4 5 G 7 

I'M 1111 
2222222 
3333333 
4444444 
5555555 
£63 6 6 6 6 
7777777 



9999999! 

12 3 4 5 6 7 



ADDRESS FIELD 



COMMENTS 



OPERATIC*, 
MODIFIERS 

o o o o o io o fi d o!o o ojo . fl 

10 11 12 13 14 IS 16 17 18 19JZ0 21 22 23 24 25 26 27 28 29 30 3132 33 34 35 36 37 38 39 40I4142 4344 4546 47 48 49 5O51 52 53 54 55 56 57 58 59 B0 61 62 63 64 65 66 67 S3 69 70 71 72 

1 1 1 1 1 1 M 1 i«i 1 1 1 1 1 1 M 1 1 1 1 1 1 1 1 1 1 1 ill 1 1 M 1 1 1 1 1 11 1 1 M 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 
i i 

2 2 2 2.2 2 2 2 2 2)2-2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2j2 2 2 2 2 

3 3 3 3 3 3 3 3 3 3J3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3*3 3 3 3 3 

4 4 4 4 4 4 4 4 4 4J4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4J4 4 4 4 4 

1 1 

555555555 5J5 55 5'5 555555555555555 5|5 5555 
1. 



6 6 6 6 6 6 6 6 6 616 6 6 6 6 6 6 6 6 6 6 6 6 6 6 6 6 6 6 6 6J6 6 6 6 6 
1 1 

17 7 7 7 7 7 7 7 7 7|7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7|7 7 7 7 7 

! !■ 



8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8|8 g 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 




9 9 9 9 9 9 9 9 9 9J9 9 9 9 9 9 9 9 9 9 9 9 9 9 9 9 9 9 9 9 9'9 9 9 9 9 9 9 9 9 9 9 9 9 9 9 9 9 9 9 9 9 9 9 9 9 9 9 9 9 9 9 9 

10 11 12 13 14 15 16 17 ■ ) 19|20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 .15 36 37 38 39 40|41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 5960 61 62 63 64 65 66 67 68 69 70 71 72 



00000000 

73 74 75 76 77 78 79 80 
11111111 

22222222 
33333333 
444444.44 

55555555 
66666666 
77777777 
88888883 
99999999 

74 75 76 77 78 79 80 



MC-ZT I29QI 



COMPASS CARD (full size) 



2.2.3.1 LOCATION Field 



Svmhnl -i r» Arlflvecc nf 1-V>o -i nef--i-in->t-'-i nr> rj-i— if-*-/ 



f-V»at- 1 •{■■-.« 



e.g. 



L00P 



ada 



TABLE 



UJP 



L00P 



OE Symbolic address of a storage area set up by a pseudo 
instruction. 



e.g. 



ALBK 



0CT 



LDA 



ALEK 



Restrictions - ( a ) 1-8 characters (need not be right 
or left justified). 

(b) First character must be alphabetic, 
others can be alphanumeric. 

(c) Special characters are not allowed, 
except period. 

(d) Imbedded blanks are illegal. 
Examples : 



LEGAL 


ILLEGAL 


ABODE A1A1A1 


1A1A1A 


r-7 r7 


A1234 XYZ.23 


T0M+5 


ABCDEFGHIJ 


X PART 3 


27 


F0G* 



2,2,3.1 (cont.) 



Special Comment Card 

An asterisk in Column 1 of the location field means that the rest 
of the card will be treated as if it is a comment. 



Example 



/* TH) 



5 IS A COMMENTS CARD, 

6 7 |l 10 I 12 I 14 15 16 I 18 15 il!, 1 1 24 || 2 7 ?» 29 30 3 1 32 33 : < 35 36 37 3 3 39 40 41 42 43 44 J 
III I I 

eo|OO|O0|O0D00O8O0||OOO00OOG0O0OOO0000OO0ODo| 

I 2 3 4 5 S 7 8 9 10 II 12 !j 14 15 16 17 18 19 20 2i 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 «i 
I 1 1 1 11 1 1 1 ill 1 1 1 I 1 I 1 1 I l|l 1 11 1 1 1 11 1 1 1 1 1 1 1 1 1 1 1 if 

22222|22|2222222222|222222222222222222222222j 

t 2 3 4 5 6 7 I 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 j 

33l333333333|33333|33|333|333333333333333333] 
1 4 4 4 444 4 4 444 4 4 || 4 4 4 4 4 4 4 4 1 4 4444 4 4 4 4 4 4 4 4 4 4 4 4 4 4j 

i y 27 28 29 30 31 t~ 



2,2,3,2 OPERATION Field 



This field can contain 

(a) Mnemonic operation codes. 

(b) Pseudo instruction Mnemonics, 

(c) Macro instruction names. 

(d) Octal instructions 00 Q -77 Q . 

o o 

The code must begin in col. 10, otherwise it will assemble as 
00 Q (halt code). Modifiers are written in this field. 

e.g. CHAR BSS,C 4 means set up an area consisting of 4 
characters and labelled "CHAH". 

Examples : 

05 

BSS 

ENA,S 

LDA 

LSA,I 

INPC,INT,B,H 

MACNAME 



2.2.3.3 ADDRESS Field 



This field can contain : 

(a) Symbols 

(b) Constants 

(c) Special Characters 

(d) Literals 

(e) Expressions 

The address field can begin anywhere after the operation 
field, provided it is separated from the operation field 
by at least one blank. 



2.2,3.3 (cont.l) 

However, it must begin before column 41 > arid finish before 
column 73* 

(a) Symbols i 

A symbol appearing in the address field must be defined by 
appearance in the location field of an instruction in the subprogram, or 
be declared as external. If it is not so defined, an error flag "XT" - 
undefined symbol - will be given on the listing. The symbol may be 
relocatable or non- relocatable . The value assigned to a non-relocatable 
symbol will not be modified on loading. 



Examples s 


LDA 


CIG.2 (relocatable) 




CIG.2 EM 







LDA 


INTADDR (non-relocatable) 




INTADDR EQU 


4 


(b) Constants: 







Integer constants can represent a number of functions depending 
on the type of instruction - 

e.g. 



octal address 


(LM) 


(LDA 100B) 


constant value 


(ENA) 


(MA 100B) 


shift factor 


(sha) 


(SHA 6 ) 



Octal integers must be suffixed by the letter B. 

NOTE: Numbers in address field are assumed to be 
decimal unless followed by a B. 



(c) Special Characters ; 

Two special entries may be made in the address field - 
(i) A single asterisk is interpreted as the current value 
of the address counter when the * is encountered. 

Example : ENA 

LM *-1 

means: Load the A register with the instruction 
preceding the LDA instruction, 
(i.e. with assembled ENA 0) 

(ii) The double asterisk causes the address portion of the 
instruction to be assembled with a 1-bit in each bit 
position, and is used where modification of the 
address will take place during execution. 

Example: START UJP ** 
Assembled as 01077777 

(d) Literals: 

If the address field refers to an operand (a value), the 
entry may be a literal, expressed as »mv. 

w.u.sre m «6 ohe mou.6 
v = the value 

Double precision literals are expressed as =2mv. 



2.2.3.3 (cont.2) 



DVA 


=D23 


DVAQ 


=2D2753 


LDA 


4tw 


LDAQ 


=207777777777777777 



The mode of the literal may be: 
(i) Decimal 



(ii) Octal 



(Up to 16 octal digits may be specified for 
double precision) 

(iii) Hollerith 

LDA "HABCD (max: 4 characters) 

LDAQ =2HABCDEFGH (max: 8 characters) 

During assembly, a literal is converted to binary, and assigned 
a relocatable address which is substituted for the literal in the object code, 
Literals are all stored at the end of the subprogram. If two literals of the 
same value and size are specified, they are not duplicated. When COMPASS 
encounters a literal, the value is compared against all other previously 
assembled literals. If an identical value exists, the address of the 
previously assigned literal is substituted in the object code. 

(e) Address Expression : 

Address expressions may be formed. 

Examples : LDA T0M-2 

ENA SYMH46B 
SYM EQU 275B 

Subprogram, data and common relocatable symbols may be mixed. 

NOTE i External symbols, the double asterisk and literals may not 
ap pear in an address expression . 



2.2.3.4 COMMENTS Field 

Comments may be included with any instruction. A blank column 
must separate them from the last character in the address field and they 
may extend to column 72. 

Comments have no effect on assembly, but will be included on the 
assembly listing. 

It is highly recommended that liberal use should be made of 
comments and comments cards . 

An example is shown on the following page. 



2.2.3.4 (cont.) 








* 


IDENT 


0NE 




* COMPASS 


COURSE 


EXERCISE 3 




* 


J. SMITH 






* 










ENTRY 


START 


*SCOPE ENTRY* 


START 


UJP 


** 






ENQ 


14B 






ENA 





INITIALIZATION 




STA 


SIM 


OF COUNTERS 


* 


STA 


C0UNT 




* 

L00P 


LM 


SUM 






AM 


C0UNT 






STA 


SUM 


MAIN 




LM 


C0UNT 


L00P 




AQJ,EQ 


START 






INA 


1 






STA 


C0UNT 






UJP 


L00P 





C0UNT 


BSS 


1 


SUM 


BSS 


1 




END 


START 



2.2,4 Coding Simple COMPASS Programs 

2.2.4.1 Beginning the Program 

The first card in the deok must be an IDENT card. This card has 
the word IDENT punched beginning at Column 10, and the program name (of 1-8 
alphanumeric characters, the first of which must be alphabetic) punched 
beginning at Column 20. 

Examples ; 











IDENT 


TB5T4Z 


° r f i ! | : 


1PEMT 


0*417 


or 


IDENT 


(fPCtiDER 



2.2,4.2 Ending the Program 

The last card in the deck must be an END card. The word END is 
punched beginning at Column 10, and the entry point (the beginning 
instruction in the program) is punched beginning at column 20. (However, 
see later section on END statement in relation to programs containing more 
than one sub-program). 

Examples : 



or 
or 



1 




10 


20 






END 
END 
END 


START 
BEGIN 
L0J2fPIN 



2.2.4.3 SCOPE Entry 

So that the program can be run under SCOPE, it is necessary to 

ensure that control returns to SCOPE when the program is finished. The 

entry point into the program should take the following form to enable this 
to be done: 



1 




10 


20 


START 
BEGIN 




UJP 
UJP 
UJP 


** 



or 
or 

This will be the first executable statement in the program. SCOPE 
will enter the return address into the location START instead of the two 
asterisks. The last executable instruction in the program should be a jump 
back to the beginning so that control can be returned to SCOPE. 

Examples : 



or 
or 



1 




10 


20 






UJP 


START 


T0M 




UJP 


BEGIN 






UJP 


L00PIN 



2.2.4.4 Deck Structure for COMPASS Course Exercises 

(i) Assembly only 

^SEQUENCE, 666 

gJOB, 1112115,6404,5 

^COMPASS, L 

^COMPASS source deck 

FINIS (punching begins in column 10) 

'-/ (end of file card) 

oo 

(ii) Assembly and execution: 

^SEQUENCE, 666 

^JOB, 1112115,6404,3 

^EQUIP,56=MT 

^COMPASS, L,X 

^COMPASS source deck 

FINIS 

7 LOAD,56 
9 

?RUN,4 

Data 

77 (end of file card) 
88 

(iii) Alternative "assembly only 11 . 

Use all cards as for execution, except RUN and DATA. 
Any LOADER errors will then be indicated, but the 
program will not be executed. 

NOTE: 1. The y is a multiple punching in column 1 of the card. 

2. The end of file card has a multiple 7,8 punching in 
columns 1 and 2. It signifies the end of the job. 
(EOF cards used on other systems that use 
]2 2 
1 1 

4 4 in column 1 thru 4 are also acceptable.) 
7 7 7 7 



STUDENT NOTES 



COMPASS INSTRUCTIONS 

3.1 LOAD INSTRUCTIONS 

3.1.1 Load A 

3.1.2 Load Q 

3.1.3 Load Index 

3.2 STORE INSTRUCTIONS 

3.2.1 Store A 

3.2.2 Store Q 

3.2.3 Store Index 

3.3 ARITHMETIC, FIXED POINT, 24-BIT PRECISION 

3.3.1 Add to A 

3.3.2 Subtract from A 

3.3.3 Multiply A 

3.3.4 Divide A 

3.3.5 Replace Add 

3.4 REGISTER OPERATIONS WITHOUT STORAGE REFERENCE 

3.4.1 Increase A 

3.4.2 Increase Q 

3.4.3 Increase Index 

3.4.4 Enter Register 

3.5 JUMP INSTRUCTIONS 

3.5.1 Unconditional Jump 

3.5.2 Compare A with Zero, Jump 

3.5.3 Compare A with Q, Jump 

3.5.4 Return Jump 

3.5.5 Unconditional Halt 

3.5.6 Selective Jump 

3.5.7 Index Jump (Incremental/Decremental) 

3.6 SKIP INSTRUCTIONS 

3.6.1 Skip if Equal 

3.6.2 Skip if Greater Than or Equal 

3.6.3 Index Skip Incremental/Decremental 

3.7 STORE WORD ADDRESS 

3.8 SHIFT INSTRUCTIONS 

3.8.1 Shift Instruction Format 

3.8.2 Shift A and Shift Q 



Chapter |fl 



3.1 LOAD INSTRUCTIONS 
3.1.1 Load A 



>•. 4 M mwm *ww% man ma 




LDA, I m,b 




, . , . . ^ . __ , . , „, ^^ „__. , « , _ 



23 18 17 16 15 14 



00 



20 


a 


b 


m 



a - addressing mode designator 
b - index designator 
m - storage address. 



Description : Loads A Register with the 24-bit contents of storage 
address M, where M - m+(B^). 
NOTE: ( ) indicates contents of. 



Examples : (i) If the contents of location 100 fl in memory is 

52307777 » what will be the contents of A after 
execution of the following statement? 

LDA 100B 
Answer : (a) . 52307777 

(ii) If location 100_ is called by the symbolic 

address L0C, what will be the contents of A 
after execution of the following statement? 

LDA L0C 

Answer : (A) - 52307777 

(iii) A block of memory in octal is as follows: 



t do 



Exercises on Load A: 



00 


00 


00 


01 


00 


00 


00 


10 


00 


00 


01 


00 


00 


00 


10 


00 


00 


01 


00 


00 


00 


10 


00 


00 



What will be the contents of A after executic 
of the following statement? 

LDA L#OK 

Answer : (A) - 00 01 00 00 



(i) L0C 



LDA 



Vxxy 



LDA 



L0C 



What will be the contents of A at the end of the above section 
of a program? 

(The function code for LDA - 200). 
If location 10l g contains 



101 010 000 011 111 110 001 100 



(in binary) 



3.1.1 (cont.) 

What is the ootal amount loaded in A as a result of the 
following instruction? 

LDA 101B T i & 3 / Is J v 
(iii) If MASK is location 105g, and a block of memory is as follows, 



104 


1234 1234 


105 


7023 1307 


106 


1111 2222 


10? 


6073 4261 


110 


3333 3333 


111 


4444 3066 



What will be in A after execution of the following instruction? 
LDA MASK+3 



(iv) The instruction to be executed is: 

LDA =D43 

Which answer gives the correct contents of A after the 
instruction has been executed? 

a. 43 8 

b. 35 1Q 

c. The contents of location 43 

d. 53 8 



3.1.2 Load Q 



i imkim 


1 IHMIilJBBlfKB mm% RliB 




! . . " ,~. 1 UK?,J . , . , nth ,,,,..,,...,,, 


i. ;>■ 1,. .Ml;' 




»,.,„..»,«,«: 



23 18 17 16 15 14 



00 



21 


a 


b 


m 



a - addressing mode indicator 
b » index designator 
m = storage address. 

Description : Load Q with a 24-bit quantity from storage address M 
where M » m + (B* 3 ) 

Examples : (i) LDQ MASK 

Load Q with the 24-bit quantity at the 
symbolic address MASK. 

(ii) If MASK contains 00001111 
LDQ MASK 
(Q) - 0000 1111 



3.1.2 (cont.l) 



(iii) If MASK = location 104g and a block of memory is 

as shown, what will be the contents of Q after 
execution of the following instruction? 

LDQ MASK-4 



76 


14 00 00 20 


77 


25 25 52 52 


100 


11 22 33 44 


101 


55 66 77 00 


102 


17 53 17 53 


103 


20 64 20 64 


104 


31 75 31 75 


105 


42 06 42 06 


106 


53 17 53 17 


107 


64 20 64 20 



(Q) - 11 22 33 44 



Exercises on Load Q 



(0 What will be the contents of Q after execution of each of the following 
instructions? (The block of memory to be used is shown below). 

00267 



L0C 



00 


00 


01 


01 


20 


10 


40 40 


11 


11 


17 


17 


20 


20 


20 


20 


16 


25 


34 07 


60 60 60 60 


21 


22 


23 24 


10 


00 00 


10 



(a) 


LDQ 


272B 


W 


LBQ 


184 


(c) 


LDQ 


L0C-3 


(d) 


LDQ 


L0C+2 



(2) 



If PLAGE » location 26l7 Q , and a block of memory is as shown, 



02616 



01 47 26 35 


12 50 37 46 


23 61 40 57 


34 72 51 60 


45 03 62 71 


56 14 73 02 


67 25 04 13 


70 36 15 24 


01 47 66 65 



3.1.2 (cont.2) 



What will be the contents of Q after execution of each of the 
following instructions? 


(a) 


LDQ 


261 3B 


(b) 


LDQ 


PLACE-1 


(c) 


LDQ 


PLACE+3 


(d) 


LDQ 


1427 



3.1.3 Load Index 



iwttim 



mmm.mimm mm$ ma 



y>hL 



w,i 



23 18 17 16 15 14 



00 



54 


a 


b 


m 



a * addressing mode designator 
b - index designator 
m = storage address 



Description : Load Index Register B with the lower 15 bits of the 

contents of storage address m. No address modification 
using index registers is possible ° 

"b" indicates which index register is to be loaded. 

Examples : (i) If ( C I0) « 12345^70 

What will be the contents of index register 2 as a 
result of the following instruction? 



LDI 



Answer : B r 



CI0, 2 



45670 



(ii) A block of memory is as shown: 



L0C 









1 


77777777 


2 3 4 


2 3 4 2 


3 


1 4 


10 4 


4 


44441 00 





2 0" 


2 2 12 


4 


4 1 2 


3 4 4 1 


4 



The index registers are as follows: 



B1 


2 


B2 


14 


B3 


7 7 7 7 3 



What will be the contents of the registers after 
the following? 



LDI 



LDI 



L0C+3,3 

T/ifrvl-fi 1 
Up\t ■ « » - 

L0C,2 



3.1.3 (cont.) 



Answer : B 



34414 



B = 00001 
B - 10404 



Exercises on Load Index instruction 

(l) What will "be the contents of the index registers after execution of 
each of the following instructions, if 

(CAB) - 00100001 

77777771 

40100010 

20002020 

33003303 







(TEMP) 






(high) 






(L0C3) 


(a) 


LDI 


CAB,1 


(b) 


LDI 


HIGH, 3 


(c) 


LDI 


ST0EE,2 


(d) 


LDI 


TEMP,1 


(e) 


LDI 


L0C3,3 


(f) 


LDI 


HIGH, 2 



(2) A block of memory is as shown: 



405 



00 


00 


00 


21 


04 04 04 04 


32 


57 


14 


13 


51 


21 


41 


61 


00 


00 


00 


00 


21 


04 00 


10 


12 


74 


11 


11 


00 


07 


77 


75 



If TAG 

registers after execution of the following instructions? 



Location 410 Q , what will be the contents of the Index 
o 



(a) 


LDI 


TAG -2, 3 


00 


LDI 


TAG+4,1 


(c) 


LDI 


411B,2 


(d) 


LDI 


TAG, 1 


•(e) 


LDI 


TAG+2,3 



3.2 STOKE INSTRUCTIONS 
3.2.1 Store A 



mmm ; •pmwn.mmps m ni$ m § 

7~ i STA, I ' m,b ^, 



23 18 17 16 15 14 



00 



40 


a 


b 


m 



a = addressing mode designator 
b = index designator 
m = storage address. 

Description : Stores the contents of the A Register in storage 

location M. (M - m+(B b )). Contents of A are unchanged. 

Examples : (i) STA H0LD 

The value in A is stored in the location specified 
by the symbol H0LD. 



(ii) (A) - 1212 3434 

TEMP » Location 101 
H0LD - Location 103 



100 


00 00 00 00 


101 - 


11 11 11 11 


102 


22 22 22 22 


103 


33 33 33 33 


104 


44 44 44 44 


105 


55 55 55 55 


106 


66 66 66 66 


107 


77 77 77 77 


110 


00 00 00 00 



TEMP 



HOLD 



lhat will be contained in the above block after the 
following : 

LDA 100B 

STA TEMP+2 

LDA H0LD-2 

STA 106B 

LDA H0LD+5 

STA TEMP 



Answer: 



100 
101 
102 
103 
104 
105 
106 
107 
110 



00 


00 


00 


00 


00 


00 


00 


00 


22 


22 


22 


22 


00 


00 


00 


00 


44 44 44 44 


55 


55 


55 55 


11 


11 


11 


11 


77 77 


77 


77 


00 00 00 00 



3.2.1 (cont.) 

Exercises on STA Instruction 

(i) If TEMPY is location 302 Q , and the block of memory shown 
results from the following instruction 

STA TEMPYH 
What were the contents of A before execution of the instruction? 



301 


7723 7723 


302 


1111 1111 


303 


2222 2222 


304 


3044 6133 


305 


2442 4224 


306 


1212 3434 


307 


7777 5555 



(ii) If H0LD - Location 103 o and TAG 

o 



Location 101_, what will be 



the contents of the block of memory below after execution of 
the following instructions? 



LBA 
STA 



H0LB-1 
TAG +3 



100 
101 
102 
103 
104 
105 
106 



0000 0000 


1111 1111 


2222 2222 


3333 3333 


4444 4444 


rccr 5555 


6666 6666 



(iii) If the above instructions were followed by 



LBA 
STA 
LBA 
STA 
LBA 
STA 



101B 

69 

TAG +5 
TAG-1 
H0LB 
H0LB+3 



What would be the final contents of the block of memory? 



3.2.2 Store Q 



l«»riM QPEfMISSJBOIFtfSS U8HSS flELi 



m>i 



.i-Oi3_Li. 



fttyb 



23 18 17 16 15 14 



00 



41 


a J b 


m 



a - addressing mode designator 
b - index designator 
m ■ storage address 



3.2.2 (cont.) 



Description : Stores the 24^-bit quantity in Q at address M, 



Example ' 



where M - m + (B ) 



LDQ 
STQ 



*+l 
RESULT 



(- 41 00 05 00) 



RESULT 



OEGR 
BSS 



500B 
1 



What would be the contents of RESULT after execution 
of the above? 



Exercise : 



Answer ; RESULT - 41000500 

A block of memory is as shown: 
L0C 



MASK 



20 00 01 00 


00 00 04 01 


00 04 44 00 


21 23 25 27 


07 04 07 04 


12 34 56 70 


00 00 00 01 



What will be its contents after execution of the following? 



LDQ 


L0C+3 


STQ 


L0C+1 


LDQ 


L0C+2 


STQ 


MASK+1 


LDQ 


MASK-4 


STQ 


L0C+6 



3.2.3 Store Index 



iocatiqm 



Description ; 



efEMiJas.iiBjRfK mmt nm 

23 18 17 16 15 14 



00 



47 


a 


b 


m 



a « addressing mode designator 
b = index designator 
m - storage address 

Store the (B b ) in the lower 15 bits of storage address m. 
H.B . The upper 9 bits of m remain unchanged, "b" 
indicates the index register. If b - 0, the lower 
15 bits of "m M are set to zero. 



3.2.3 (cont.) 



Examples : (i) STI TMP2,2 where (TMP2) = 40050012 



(B 2 ) - 63636 



After execution (TMP2) = 4OO63636 

(ii) If (FIELDA) = 31244444 

(CHANGE) - 11111111 

What will be the contents of TEMPY after 
execution of the following? 

LDA FIELDA 

STA TEMPY 

LDI CHANGE, 3 

STI TEMPY, 3 

Answer ; (TEMPY) - 31211111 

(iii) If (B 1 ) - 00502 

STA ** 

LM *-i 

STA H0LD 

STI H0LD, 1 
What will be the contents of H0LD? 

Answer: (H0LD) = 4000 0502 

Exercises on Store Index instruction 

(1) If (Ljfc) = 21043072 

(B 2 ) = 00004 
What will be contents of L0C after execution of the following? 

STI L0C,2 

(2) If (L0C) - 21043072 

(TEMP) - 00140001 

What will be the contents of L0C and TEMP after execution of the 
following? 

LDA L0C 

LDI TEMP, 2 

STA TEMP 

STI TEMP ,2 

(3) If (TEMP) « 23002000, (BIG) - 77777772, and (H0LD) - 00000001, 

What will be contents of TEMP and BIG after execution of the 
following? 

LDA TEMP 

STA H0LD 

LDI BIG ,3 

STI H0LD 

LDI TEMP ,3 

STI BIG ,3 

LDA H0LD 

STA TEMP 



3.3 ARITHMETIC, FIXED POIHT, 24-BIT PRECISION 
3.3.1 Add to A 



.3:«!i'5 


N : OPtSiliON *US!f 


BS sbimss no 






»oa,i 


'Hyk 




._ 


_*_ _. _.__ 




■:i».«,»L.. ! »|,. ! „i«,j,.ir. 



23 18 17 16 15 14 



00 



30 


a 


b 


m 



a = addressing mode designator 
b = index designator 
m = storage address 

Description t Adds the 24* "bit quantity located at address M to the 
contents of Register A. The result is stored in A. 
M = m + (B*>). 

Examples : (i) If (100 Q ) = 10001010 

(A) = 00077777 

What will be the contents of A after execution of 
the following instruction? 



ADA 



Answer • 



(k) 



100B 
inimnn7 



(ii) If 0PR » location 100 Q in the block of memory shown, 
what will be the contents of A and index register 2 
after execution of the following? 



100 
101 
1-02 
103 
1Q4 
105 

LDA 
STA 
LDA 
ADA 
STA 
STI 
LDA 
ADA 
LDI 



1 1 


00141310 


21000005 


-.140140 00 


7 7 1 7 7 7 


2 2 10 2 



0PR+2 

0PR-F4 

0PR+3 

0PR+4 

0PR+2 

0PR+2,2 

0PR+5 

0PR+2 

0PR+1,2 



B « 00014 



Answer: 



(A) 



55201034 
41310 



3.3.1 (cont.) 



Exercise : 



A block of memory is as shown: 



100 



00 


00 


00 


01 


00 


00 


00 


02 


00 00 00 03 


00 


00 


00 


04 


00 


00 


00 


05 


00 00 00 06 


00 


00 


00 


07 


00 


00 


00 


10 



(a) Write a program segment which will add together the contents 
of locations 100, 102, 104 and 106 and store the result in 
107. 

(b) Write a program segment which will add up locations 101 
and 102 and store the result in 103, add 103 and 104 and 
store the result in 105, and add 105 and 106 and store 
the result in 107- 



3.3.2 Subtract from A 



SB A, I m »M 



23 18 17 16 15 14 



00 



31 


a 


b 


m 



a = addressing mode designator 
b = index designator 
m =* storage address 



Description ! Subtracts the 24-bit quantity located at address M 

from (A). The difference appears in A. M=m+(B b ) 

Examples ; (i) If (a) ». IO4O404O 

(ioo 6 ) - 10303030 

SBA 100B 

Answer ; (A) - 00101010 

(ii) If (A) - 04444444 
(TEMP) - 02132132 
SBA TEMP 

Answer: (A) - 02312312 



3.3.2 (cont.) 



(iii) 



TEMP 



10 1 


24001020 


7 7 7 7 7 7 7 7 


14 2 10 2 


00001 000 


000022 22 


2 020202 



What will "be in this section of memory after the 
following? 



LDA 
AM 
STA 
SBA 
STA 



TEMP 

TEMP+6 

TEMPf2 

TEMP+4 

TEMP+5 



Answer : 



1 0000001 


24001020 


12 2 2 3 


14 2 10 2 


10 


12 17 2 3 


02020202 



TEMP 



Exercises on Subtract from A 



(a) LEA 


=D401 


SBA 


=D30 


What will then be 


» the contents of A? 


(b) If (C0DE) = 00000001 


What will be the 


contents of H0LD after the following? 


LDA 


C0DE 


ADA 


C0DE 


STA 


H0LD 


ADA 


H0LD 


STA 


H0LD 


ADA 


H0LD 


ADA 


H0LD 


STA 


H0LD 



(c) Write a program segment to multiply the contents of X by two and 
subtract from the answer, the contents of locations Y and Z. 
Store your answer in ANSWER. 



3.3.3 Multiply A 



MWI5K 4I08E5S flEii 



23 18 




atf b 








17 16 15 14 


-.,::,'. :..-.: 


00 


50 


a 


b 


m 



a = address mode designator 
b = index designator 
m = storage address 

Description : Multiply the contents of A by the contents of Address M. 
The 48-bit product appears in QA with the lowest order 
bits in A. 



Examples : 



M 



+ (B°) 



(i) What will be the contents of QA after execution 
of the following instructions? A contains lOCLp 
and TABLE contains 5. 



STA 
LDA 
MUA 


SUM24 
TABLE 
SUM24 






Solution: SUM24 


= 


00 00 01 00 












A 


ss 


00 00 00 05 










Q 


A 


Answer - 


00 00 00 00 


00 00 05 00 



(ii) If TABLE contains 5 and A contains 20000000 8 , what 
will be the contents of QA after execution of the 
following instructions? 



STA SUl 
LDA TA] 
MUA SUl 

Solution: SUM24 = 


424 
BLE 
424 








20 00 00 00 












A 


00 00 00 05 










Q 




A 


Answer = 


00 00 00 01 


20 00 00 00" 



Exercises on Multiply A Instruction 

(a) If (A) - 10 , (TABLE) = 3 , (SUM24) = 5 , and (H0LD) = 

what will be the contents of A after execution of the following 
instructions? 



MUA 


TABLE 


STA 


H0LD 


LDA 


SUM24 


MUA 


TABLE 


ADA 


H0LD 



3.3.3 (cont.) 



(b) A "block of memory is as shown 



100 



00 


00 


00 


01 


00 


00 


00 


02 


00 


00 


00 


03 


00 


00 


00 


04 


00 


00 


00 


05 


00 


00 


00 


06 


00 00 00 0? 


00 


00 


00 


10 



Write a program segment to add the contents of 100 and 101 s 
multiply the result "by the contents of 102, add the contents 
of 103, 104 and 105, multiply the result by (106) 9 and then 
add (107). Store the result in 100. 



(c) What will be the contents of A after execution of the following 
sequence of instructions, if the initial contents of A = 0, 
(jfaE) = 6, (TW0) = 2, (THREE) - 10 1Q . 



ADA 


0NE 


MDA 


TW0 


SBA 


THREE 


MUA 


0&B 


MA 


0HE 


SBA 


TW0 


ADA 


THREE 



3.3.4 Divide A 



l,s" „s. 


. 1 . -.'.,. 






i 


DYA,1 in,.*! 










23 18 17 16 1.5 14 




00 




51 


a 


b 


m 



a = addressing mode designator 
b « index designator 
m = storage address 

Description : Divide the 48 bit quantity in AQ by the quantity in 
storage at address M (M = m + (Bh)). The quotient 
appears in A, and the remainder with its sign extended 
appears in Q. 

If a divide fault occurs, the instruction halts and the 
program advances to P + 1. (The contents of A and Q, 
are usually meaningless in this case.) A divide fault 
occurs whenever the number of leading sign bits 
(0 or 1, ie, + or -) in M is greater than or equal to 
the number of leading sign bits in AQ. A fault can 
also occur if the number of sign bits in M is one less 
than that in AQ;' however, the actual number in M and 
in AQ now has to be considered. Since the number in 
AQ is usually achieved by shifting AQ 24 bits to the 
right, extending the sign thru A into Q, an overflow 
rarely occurs. 



23 
^Quotient greater than 2.-1 



3.3.4 (cont.) 



Example : 



If (AQ) = 
and (D) = 



00000000 


37777777 



00000001 



What will be in A and Q after execution of: 
DVA D 



Answer : (A) = 
(Q) = 



37777777 



00000000 



= Quotient 
= Remainder 



Divide Fault bit =0, ie, 'No Divide Fault" 

Note: Had the initial contents of AQ been just one 

number larger, a Divide Fault would have occurred. 



Exercises: 



(a) If (a) - 0000 0000 

(Q) . 0000 4040 
(TAG) - 0000 2000 

What will be in A and Q after execution of the following instruction? 

DVA TAG 

(b) If (A) - 00000000 

(Q) - 00000122 
(L0C) - 00000005 

What will be in A and Q, after execution of the following instruction? 

DVA L0C 

(c) If (A) - 7777777 



(Q) - 7777771 
and Index Register 2 contains 00003 



TAG 



What would be in A and Q after the instruction: 
DVA TAG ,2 

(d) If Index Register 2 contains 4» TAG is as above, and 
(A) and (Q) are as shown: 

A G 



0000 


0007 


0014 


0140 


0771 


7717 


0000 


0004 


7777 


7773 



7777 7777 



7777 7771 



What would be in A and Q after execution of the following 
instruction? 



DVA 



TAG, 2 



(e) Draw diagrams of the machine instruction word which would be 
assembled from the following COMPASS instructions: 



(i) DVA 
(ii) DVA 



474B.1 
100B 



3.3.5 Replace Add 



~EM%Jl 






23 18 17 16 15 14 



34 



00 



a = address mode designator 
"b = index designator 
m = storage address. 

Description ; Replace the quantity at address M with the sum of (M) 
and the contents of A register. M = m + (B b ). 

The A register remains unchanged. 
Examples ; (i) If A = 674321 36 Q and 



(INC) 



100 £ 

STA 
LDA 
RAD. 



L0C 
INC 
L0C 



L0C now equals 674322 36B. 
(ii) If (A) = 200 Q and (INC) - 500 c 
RAD INC 
Answer ; (INC) = 700g 



Exercise ; 



If (A) - 100 fl and (INC) - 200 8 



RAD 
STA 
LDA 
STA 
LDA 
RAD 
LDA 
STA 
LDA 
RAD 
LDA 
STA 



INC 

TEMP 

INC 

0NE 

TEMP 

INC 

INC 

TW0 

TEMP 

INC 

INC 

THREE 



What will be the contents of 0HE, TW0 and THREE? 



3.4 REGISTER OPERATIONS WITHOUT STORAGE REFERENCE 
3.4.1 Increase A 

I utcs?im_ J 'MmmmMmmn mmsnw ~ ~ 



23 18 17 16 15 14 



00 



15 


i 


b 


y 





b = 


if sign extension 


[ mmm 


,"'f.';ij»«8B!REK mmm reib 




jnas ^ 






14 00 




23 18 17 15 




15 


4 


y 




b = 2 if no sign extension 


"• "» 3 f ESI1iN HtDIHfK WMfSS ROI 


INA u 



23 18 17 15 14 



15 



00 



HI 



Description : Adds the amount "Y" to the contents of the A register. 
If there is no sign extension specified, only the 15 
bits of "Y" are added to A. 

If sign extension is specified, the sign bit of y is 
extended before addition to A. (Bote - if A is 
increased by a negative number, sign extension should 
be used.) 

Examples i (i) If (a) - 00 00 00 01 
INA 12B 
(A) - 00 00 00 13 

(ii) If (A) - 00 00 00 01 
INA, S 40000B 
(y - 777 4 0000) 

Answer i (A) - 7774000 1 

Exercises ^ (ERR0RC) « 00004040B 

(a) What will be the contents of ERR0RC after the following? 

LDA ERR0RC 
INA 55565B 
STA ERR0RC 

(b) If the instructions had been 

LDA ERR0RC 

INA,S 55565B 



STA 



sRR0R< 



What would have been the final contents of A? 



3.4.1 (Cont.) 



(c) If (ERRJ^RC) = 60^0, write the coding necessary to increase 
it to lOOio* 

(d) If (A) = 10s, what will be the final contents of A after 
execution of the following? 

INA,S 77776B 



3.4.2 Increase Q 



■IWjS ., y 



23 18 17 16 15 14 



00 



15 


1 


b 


y 





b = 1 


if sign extension 


' s "V - n , , >/: -; f, • 


r- ; - 


: ; JM,? 


-■<■■£ ' ' - • ^ - ; , ,, 



23 18 


17 15 


14 




00 


15 


5 


y 



b = 3 if no sign extension 



INQ 



23 18 


17 15 


14 




00 


15 


7 


V 



Description : Adds the amount "Y" to the contents of the Q register. 
If there is no sign extension specified, only the 15 
bits of "Y" are added to Q. 

If sign extension is specified, the sign bit of y is 
extended before addition to Q. (note: if Q is increased 
by a negative number, sign extension should be used.) 

Examples : (i) If (ft) = 00 00 00 20 
INQ 60B 

Answer : U) « °0 00 01 00 

^-J If . ^ = QQ.QQ QQ 20 

INQ,S 44444B 
( y = 777 44444) 

Answer : (q) = 777 44464 

Exercises: (i) If (Q) = 577g> what will be the result in Q 

after the instruction INQ 5473 is executed? 



3.4.2 (cont.) 



(ii) If (Q) - 50B, (STACK) « 500B what will be the 

result in Q after the following sequence of 
instructions? 

INQ 100B 

STQ TEMP 

LDA TEMP 

RAD STACK 

LDQ STACK 

INQ,S 27711B 



3 » 4 » 3 Increa se Index 

I LOCATION 



IPiMIIMJlCififSS HgRfSS FIC1P 



23 18 17 16 15 14 



00 



15 





b 


y 



b — index register designator 

Descriptiom Adds the 15—oit quantity "y" to the contents of the 
index "register specified. 



Ex amples t 



(i) 



(ii) 



INI 6,2 where (B 2 ) = 12B 

2 
What will he the contents of B ? 

20B 



(B 2 ) 



LDI 100B, 3 

IBI 10B, 3 

What will he the contents of B 3 ? 

(B 3 ) - (100B) + 10B. 



(iii) If a block of memory is as shown below, what will 
be in the index registers as a result of the 
following! 



107 



20 


00 


00 


04 


40 


10 


00 


21 


60 


00 


00 


01 


77 


77 


77 


77 


00 


00 


00 


20 


04 


01 


07 


01 


22 


22 


33 


33 



LDI 11 OB, 1 




LDI 111B,2 




IHI 20B,2 




LDI 113B,3 




INI 70B,3 




Answers B ■ 


21B 


B 2- 


21B 


B, - 


110B 



3.4.3 (cont.) 



Exercises on Increase Index instruction 



(i) A block of memory is as shown* 



100 



00 00 00 01 


00 00 00 10 


00 


00 01 00 


00 


00 10 00 


00 01 00 00 


00 


10 00 00 


01 


00 00 01 

■ 



What will be the contents of the three index registers after 
execution of the following? 



LM 
RAD 
LDI 
INI 
LDI 
III 
LDI 
INI 
STI 
LDA 
HAD 
LDI 



101B 
100B 
100B, 1 
100B, 1 
104B,2 
17777,2 
106B, 3 
100B, 3 
106B,3 
106B 
106B 
106B, 3 



(ii) If index 1 contains 1, write a program using this 

index to store the numbers 1,3> 5> 7 and 8 in 5 consecutive 
locations beginning at location 100. 



3.4.4 Enter Register 



23 18 17 16 15 14 



00 



14 


d 


b 


y 



(a) d = 1 
b = 2 



1 L0CATISH 


WMTHHUHWIFKB MOSESS fiELS 


Li-i * -^ ■■ 


£M , .V , lJ . l : ^ U , . . , , : 


1. :«:>|4. ..«!-.,. 


, ._._!_. J. ^-^ a.^"-'^ JL.'-. i.«B_ 



23 18 17 15 14 



00 



14 


6 


y 



(b) d = 1 

b = 

JJMTIM : jSl'ESiUim.WBJf.HS MIM SS FiCt fl 

— -— — Bj4 A S . . ~ :« . ".". . . '." 



23 18 17 15 14 



00 



14 


4 


y 



•\ 



> 



J 



Enter A 



(c) d = 1 
b = 3 

_usm?sm IPl L* Ts i x ' M i™L h l mm Hm 



23 18 17 15 14 



00 



14 


7 


y 



(d) d = 1 

b = 1 



tfCHIM CPtWIIMJBSiHflS ADDRESS FIC1B 



23 18 17 15 14 



00 



14 


5 


y 



"N 



> Enter Q 



<< 



(e) d = 

b = index designator 

tiClTIHN ' IFiimMJODJfiESiS I.PPBE S5 FIH 8 

.". : mi .'" 



^A 



23 18 17 16 15 14 00 



14 





b 


y 



"N 



Enter Index 



If b = 0, this is a no-operation instruction. 



3.4.4 (cont.) 

Description : The 15-bit quantity "y" is entered in the specified 

register. The register is cleared "before "y" is entered. 
If sign extension is specified, the sign bit of "y" is 
extended before "y" is entered into the register. 

Examples : (i) ENA 14B 

(A) « 00 00 00 14 

(ii) ENQ,S 40001B 

(Q) - 777 40001 

(iii) ENI 77B,1 

(B 1 ) = 00077 

Exercises on the Enter Register Instructions 

(1) If (Q) • 11025321, and location 70g contains 10101o 
what will be the contents of Q after execution of the 
following? 

ENQ 70B 

(2) AA ENA 

LDA *-1 
INA 40 
STA AA 

What will be the contents of storage location "AA" after 
execution? 



(3) If (FIELD) = 



1010 1010 



and FIELD « locaton 456B 

What will be the contents of the A Register after execution 
of the instruction 
ENA FIELD 



(4) 



ENA,S 





STA 


100B 


EN I 


10B,1 


INI 


100B,1 


STI 


100B,1 


LDA 


100B 


INA,S 


40000B 


STA 


100B 


LDI 


100B,2 



What will be the contents of A, B 1 and B 2 after execution 
of the above? 



3.5 JUMP INSTRUCTIONS 



3.5.1 Unconditional Jump 



UJPyl m>b 



23 18 17 16 15 14 00 



01 


a 


b 


m 



a = addressing mode designator 

b = index designator 
m = storage address 

Description : Unconditionally jump to address M, where M = m + (B ) 
Examples ; (i) E0F LDA 100B 



UJP E0F 
Control will jump back to statement EOF 

(ii) AAA UJP *+2 (AAA = address 10) 
Program jumps to address 12. 

Where the address to which control is to jump is not known 
at the time of assembly, but will be entered in during execution, 
the instruction is usually coded as follows, to enable easy recog- 
nition of the statement in assembled programs: 

UJP ** (assembled as 01077777) 

This causes 1 bits to be set in the address portion of the word, 
and this will be replaced during execution by the actual address 
to which control is to jump. 

SC$PE entry to a program takes this form. (See section 2.2,4.3) 

However, in such cases, the contents of the address portion of 
the word may be any legal address. Whatever the address is, it will 
be replaced by the correct address during execution. Thus: 

UJP ** 

UJP * 

UJP *+7 

START UJP START 

will all serve the same purpose, for they will all be modified as 
required in the program, during execution. 



3.5.2 Compare A with Zero, Jump 



23 18 17 16 15 14 



00 



03 





J 


m 



j =jump designator (0-3) 
m = jump address 



(a) j = 0, jump if A = +0 or -0 



I lOCATiOK 


1 MKMliaHJiiFlESS SBOBESS Rfll 


i J_i : : I - 


j #ZJ,£Q *» , 


I- j. :.:•:>:. ,,,.,,1: ..,:„;.■:,„„ : V ,,^„C, „ ± , H „,,. <„,«. S » • | „ :,,. ,,: „ ,„,„ , , K „ , „ „T : 



23 18 


17 


15 


14 




00 


03 





m 



(b) j = 1, jump if A i= +0 or -0 



isSMiSN ■ ! 8rEfi«]i8H MODIFIERS »10R"S FlflP 

~7~77 T\ii3uJiE~~*~77~7~ 



23 18 


17 


15 


14 




00 


03 


1 


m 



(c) j = 2, jump if A £ +0 (-0< +0) 



OMIIM : lOPESAl ISK, MODiFEESS ADDRESS FKlt 



AZ</,6£ , . m . . : . : 



23 18 


17 15 


14 




00 


03 


2 


m 



(d) j = 3, jump if A < +0 (-0<+0) 



LOCATfSN : OPtfi*^0H,MiB!FlESS ABD8ESS FIELD 



mJ,LT w 






; „ ■,:,■,■>. .-.,»;« ,-,.;,,.,.,„,. 


,.:|»:!,l«:>.|»l.5: 


VV>:U/», 


23 18 17 15 14 




00 


03 


3 


m 



Description : (A) are compared with zero to establish test conditions 
as above. If the condition specified by the modifier 
is true, the program jumps to address M m" . If the test 
condition is not true, RUI from address P + 1. (ENI = 
read next instruction). 



3.5.2 (cont.l) 

Example : If (l) - 1 

(i) What will be the RNI address after execution of 
AZJ,EQ L00P 
Answer : RNI at address P + 1 

(ii) If the instruction had been 
AZJ,GE L00P 
Answer : RNI at address L0V 

Exercises : 

Given the information below, give the RNI addresses for each problem. 

(i) If (A) - 77777777 

AZJ,EQ 100B 
BNI - ? 

(ii) If (A) - 00020000 

AZJ,EQ ST0RE 
RNI - ? 

(iii) If (A) - 00000000 

AZJ,NE CARRY+1 
ENI - ? 

(iv) If (A) - 77777776 

AZJ,LT NEXT 
RNI - ? 

(v) If (A) - 03675671 

AZJ,GE 0NE 
RNI » ? 

(vi) If (A) - 00000000 

AZJ,GE L$fP 
RNI = ? 

(vii) ENA,S 40001 B 
AZJ,GE YES 
RNI = ? 

(viii) ENA 77777B 
AZJ,LT MAYBE 
RNI - ? 

(ix) ENA,S 20741B 
AZJ,GE 200B 
RNI - ' ? 

(x) ENA,S 32767 

AZJ,LT FINISH 

RNI - ? 



3.5.2 (cont.2) 

(xi) Which Halt will be reached after execution of the 
following program segment? 

LDA. .-0423 

SBA. =0424 

AZJ,EQ HLT 

UJP HLT+1 

HLT HLT 1 

HLT 2 

3.5.3 Compare A with Q, Jump 



23 18 17 16 15 14 



00 



03 


1 


J 


m 



j =0-3 jump designator (0-3) 
m=jump address 



(a) J = 0, jump if A = Q (+0 = -0) 

mnn_ \ wimmMttrnm mmm ran 

__ ^ _, ■ ^ _^ _ ^ ^ ^_ 



23 18 


17 15 


14 




00 


03 


4 


m 



(b) j = 1, jump if A ? Q (+0 = -0) 



| WMTiM 


«hu'- i m: - n wmm ran 






AQJ,W£ .,.*.,,..,.... 




, . . 


Uil.:i;;ai^t^i!^^r'l^^=i* : i^i^-«iSi^i'-i><iii.«: 





23 18 17 15 14 



00 



03 ' 


5 


m 



(c) j = 2, jump if A£---Q (+0>-0) 

5 lf! ?i 1 jWMM.MIMffiS ftOBBfSS FIE1B ______ 



23 18 17 15 14 



00 



03 


6 


m 



(d) j = 3, jump if A < Q (+0> -0) 



' iOCSIIOd 


OPifiJiioN.*ofl;?!»s mms fiats 




AQJ,LT m 


,.,,,,,.. , , . , .. ,, . , , t , .. ( , f . ; „ ,. ( . L ^ „ , t „ ^ ,. 
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m 



3.5.3 (cont.) 



Description : The quantity in A is compared to the quantity in Q 
to establish a comparison or test - condition. If 
the test-condition is true, ENI from address "m M . 
If not true ENI - P+1 . 



Examples : (i) AQJ,EQ L$0P 
RNI L00P 



(A) - 00000000 
(Q) - 77777777 



(ii) AQJ,GE 



ENI L0F (+0>-0) 



L$0P (A) = 00000000 
(Q) = 77777777 



Examples : Given the information below, supply the RNI's 
for each problem: 



(a) AQJ,LT 

ENI - 

(b) AQJ,GE 

ENI - 

(c) AQJ,NE 

BNI - 



L00P 



L00P 



L00P 



(A) =07234567 
(Q) .04444444 

(A) = 50523417 
(Q) - 23456733 

(A) - 00 00 00 01 
(Q) - 10 00 00 01 



3.5.4 



Return Jump 



; 10CAT10M 


!OFCR*Ti«K.MBBiriERS A8DSESS Hilt 
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RTJ m 
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Description : The address portion of the contents of address m is 
replaced by the return address P + 1 . The program 
jumps to m + 1, i.e. ENI - m + 1. This instruction 
is used for subroutine linkage. 

Examples : (i) ETJ XS0RT 

Here the address portion of XS0RT will be replaced by 
the address of the ETJ instruction + 1 , and the 
program control will advance to XS0RT+1- 



3.5.4 (cont.l) 



(ii) 



RTJ 



SUBR0UT 



[106] 



SUBRjZftJT UJP 



[200] 



UJP 



SUBB0UT 



[210] 



If the numbers in brackets indicate the addresses of 
the respective instructions, the assembled program 
before execution would appear as: 



00100 



00700200 



00200 



01077777 



00210 



01000200 



After execution the contents of memory would 
appear as : 



00100 



00700200 



00200 



01000101 



00210 



01000200 



Note: ** is assembled as 11111 § and is used 
where the value is to be changed at 
run time, such as the address portion 
of the instruction at address 00200. 
Or, to say it another way, ** = TBC 
(To Be Clobbered.) 



3.5.4 (cont.2) 



Use of the RTJ statement 



There are two types of subroutines used in COMPASS - open and 
closed. An open subroutine is a series of instructions which is required 
more than once during a program, and is inserted where it is required. 



e.g. 




Open 
Subroutine 



This method has obvious disadvantages and it is more usual to 
employ the closed subroutine method. 



e.g. 



Main 
Program 



Jump to Sub. 



Main 
Program 



Jump to Sub. 



Main 
Program 




Closed 
Subroutine 



/ Return to Main Prog. 



What is the problem here? 

It is that the program jumps to the subroutine from two or more 
points in the main program, and once the program is in the subroutine, how 
does it know to which main program instruction it should return? 



It doesn't, since it doesn't know where the jump to the 
subroutine was located in the Main Program. 



3.5.4 (cont.3) 



This problem is eliminated by using the RTJ (Return Jump) 
instruction in the Main Program when a jump to the subroutine is desired. 
The instruction stores the address of the instruction following the RTJ 
in the lower 15 bits of the first instruction of the subroutine. The 
first instruction is then skipped and the first instruction executed is 
actually the second instruction of the subroutine. 



e.g. 



Main 
Program 



RTJ to Sub. 



Main 
Program 




Closed 
Subroutine 



RTJ to Sub. 



_/ Jump to first 
& Instr. of Sub. 






Main 
Program 



Following is a section of a Compass Program that illustrates 
this latter method: 



ENI 


0,1 


LBA 


100B 


SBA 


101B 


RTJ 


SUB 


LDA 


105B 


MUA 


155B 


RTJ 


SUB 


LDA 


255B 


INA 


21 



etc. 



SUB 



UJP 


** 


AZJ.LT 


SUB 


INI 


1,1 


UJP 


SUB 



When the RTJ instruction is encountered, execution jumps to SUB, 
and the address portion of SUB is replaced by the address of the RTJ 
instruction + 1. After execution of the instructions in the subroutine, a 
jump is made back to SUB, which instruction is now an unconditional jump to 
the instruction after the RTJ instruction. Execution of the Main Program 
then continues. 



3.5.5 Unconditional Halt 



mmm ; ;8fflimBN,M0«fios; m ms ma 



23 18 17 15 14 



00 



00 





m 



Description : Unconditionally stop at this instruction. Upon 
restarting, ENI from address "m" 



Example : 


CTR.l 


LDA 


CTR.2 






JSk 


100B 






STA 


T0M,1 






ISE 


10,1 






UJP 


GTR.1-3 






HLT 


SEVM 




SEVM 


LDQ 


MA.SK 



END 
3«5»6 Selective Jump 

23 18 17 15 14 



00 



00 


j 


m 



j = 1 - 6 = SELECTIVE JUMP switch number 



j = 1, jump if "SELECT JUMP 1" switch is on 



SJMBB !*SIUt="i t*Cl 



sji 



j = 2, jump if "SELECT JUMP 2" switch is on 



SJ2 



j = 3, jump if "SELECT JUMP 3" switch is on 



;OTsmioNjpi)JH«$ amm nop 

SJ3 ' " tn 



j « 4, jump if "SELECT JUMP 4" switch is on 



mm 



mmimMmmtm uitm nai 
SJ4 " w~ 



j = 5, jump if "SELECT JUMP 5" switch is on 



\ IKJSTION 


'mmm.mimm mm$ mit 






U_ SJS m 


i.LMJJiL'-i>i±L. 


M ' 


,,„:„)„,„„ 


!1 , : „,,, i 



j = 6, jump if "SELECT JUMP 6" switch is on 



mm ^ :op{RAiignj §DinH s unm fiei b 

■:.!,:! 5J6 ,., '19. .,,.,, . 



j = 0, see HLT instruction 
j = 7, see RTJ instruction 



3.5.6 (cont.) 



Description; Jump to address m if the jump key specified is set "on", 
Otherwise RNI P+1 . 

Example : 





SJ4 


BYPASS 


CARDS 


LDA 


CARD,1 




ADA 


TEMP,1 




UJP 


ENDING 


BYPASS 


LDA 


TAPE, 2 




ADA 


ST0RE,2 


ENDING 


HLT 


L0C4 



END 

If jump switch 4 is set "on" jump to BYPASS otherwise 
HNI at address CAEDS. 



3»5«7 Index Jump (Incremental/Decremental) 



23 18 17 16 15 14 



00 



02 


d 


b 


m 



b = index register designator 



d = 0, Index Jump Increment 



inmiftn op(i:ii'ii(.wf?!f!(«$ in%m p.nj 



IJI m,b 



23 18 


17 15 


14 




00 


02 


b 


» I 



d = lj Index Jump Decrement 

now h r 1N "B f i »^ tvltW P IB 

IJD m t b 



23 18 


17 15 


14 




00 


02 


b + 4 


m 



Description ; Jump to V if (B ) £ and increment (or decrement) index 
by 1 . There are 3 possible conditions : 

(i) If b ■ 0, the instruction is a no-op. and 
RNI from P + 1 . 

(ii) If (B b ) - RNI from P + 1 . 

(iii) If (B ) / 0, the jump test condition is 
satisfied. One is added or 
subtracted to (B^); jump to 
address m and RNI. 



N_-B. The counting is done in a one's complement adder. 
Negative zero is not generated because the count 

progresses 77775 , 77776, 00000, stopping 

at -K). If a *■ is initially in B 13 , the count 
progresses 77777, 00001, etc. 



3.5.7 (cont.) 








Examples : 




ENI 


9,2 




L00P 


LDA 


BTJFFEB,2 






STA 


DATA ,2 






IJD 


L00P,2 






HLT 








How many 


words will transfer? 




Answer : 


10 10 




Exercises: 




ENI 


-5,1 




L00P 


LDA 


T0M 



IJI L00P,1 
HLT 

How many times will the loop be executed? 



3.6 SKIP INSTRUCTIONS 



3.6.1 Skip if Equal 



23 18 17 16 15 14 



00 



04 


d| 


b 


y 



(i) d = 1 

b = 



lOCATIOH 


OPERJIIOHJOIIIFIHS MSIfSS Flf.18 


,,,,.,, 




m>* .,..:*............ 




, ,,,,,.-:•> !!,'!• 




J 





23 18 17 15 14 



00 



04 


4 


y 



(ii) d = 1 

b = 2 



[ LOMTitR 


OPHHTtMJIWFiHS IOBHSS FIEtB 




(,.,:,,. 


/»S£ 4 , .,..,, 




l 




£i**iiti 



23 18 17 15 14 



00 



04 


6 


y 



(iii) d = 1 

b = 1 



\ LOCATIOH 


mmmMwmm muss ma 


QS£ } s H 





23 18 17 15 14 



00 



04 


5 


V 



(iv) d = 1 
b = 3 



^S£ 



23 18 


17 15 


14 




00 


04 


7 


y 



(v) d = 

b = index designator 



J KSn !i_ ' ■■0PF.8*ii8N,HtlllFl» S APOBCSS FIFi e 

ISE 



41A 






23 18 


17 


15 14 




00 


04 




b j 


y 





b = index register designator (1-3) 
If b = 0, y is compared to zero. 



3.6.1 (cont.l) 

Description: If the instruction is ASE, QSE or ISE; (Ai Qwer ^5), 
Slower 15^ or (^) respectively is compared bit for 
bit to "y". If equal, RNI from P+2, otherwise RNI 
from P+l. 

Note: To be equal to "y", the quantities must be 
exactly the same, thus if (A) or (Q) = 
xxxOOOOO or (B b ) = 00000, 1I y" must be 00000 
to be equal. Or, if (A) or (Q) = xxx77777 
or (B b ) = 77777, "y» must be 77777 to be equal. 
If sign extension is specified, i.e. the instruction 
is ASE,S or QSE,S the sign of "y" (bit 14) is extended 
and the 24 bit quantity is compared with the quantity 
in the specified register. 

Note: In this case, if (A) or (Q) = 77777777 or 00000000 
and "y" is 77777 or 00000, the quantities are 
considered to be equal. For all other values in 
A or Q, the sign extended "y" value must be 
exactly the same to be considered equal. 

Examples : (i) ISE 300B,2 

If (B 2 ) - 300 g , MI P + 2. 

(ii) ISE 50,1 (B 1 ) « 62g 

What is the MI? 

BBI « P + 2 

(iii) BEGIN LDQ PIELM 
QSE 6421 0B 



FIELDA 0CT 50964210 
What is the MI after QSE? 
MI » P + 2 (=BEGIN + 3) 
(iv) Example of use of ASE instruction in a loop, 

ENA 

L#fP STA CIC.l 

STA TEMP 

LDA *-2 

IBA 1 

STA *-4 

LM TEMP 

IBA 5 

ASE 25 

UJP L00? 
HLT 

TEMP BSS 1 



This will store numbers 0, 5, 10, 15 and 20 in 
consecutive locations, begining at location CIC.L 



3.6.1 (cont.2) 



(iv) Use of Index skip-if- equal in a loop, 
L00P 



MI 


0,1 


LM 


VALUE 


MUA 


=D5 


DVA 


=D8 


STA 


RESUM 


LM 


L00P 


INA 


1 


STA 


L00P 


LM 


*-4 


INA 


2 


STA 


*-6 


INI 


1,1 


ISE 


100,1 


UJP 


L00P 


HLT 




0CT 


1 



VALUE 
Exercises on SKIP-if- equal instructions 

(a) How many times will the following loop be executed? 
L00P 



ENQ 





LM 


ANS 


MUA 


TW 


STA 


ANS 


INQ 


5 


QSE 


100 


UJP 


L00P 


HLT 





(b) Write a program segment to move ten numbers in consecutive 
locations, beginning at STORE, to consecutive locations beg- 
inning at RESULT. 

(c) If CHECK contains 20100010, how many times will the following 
loop be executed? 



L00P 



LDQ 
LM 

INQ 



CHECK 



QSE 



HLT 



12 
L$#P 



3.6..1 (cont.3) 



(d) What will he the final contents of HOLD after 
execution of the following? 



ENI 


0,1 


EZ3A 





STA 


H0LD 


ISA 


10 


INI 


1,1 


ISE 


10,1 


UJP 


*-3 


STA 


h^Ld 



3.6.2 Skip if Greater Than or Equal 

23 18 17 16 15 14 00 



05 


4 


b 


y 



(i) d = l 
b = 



18C/SIS0K 1 


QPEMllil,MWntK MiMSS FIEti 




AS6.5 ....:«.,....,.,, 


i 


k y 



23 18 17 15 14 



00 



05 


4 


y 



(ii) d = 1 
b = 2 



1 UMIIM 


I iwiwraoMraK mmm heu 




1 ....... i l^ .,..., ty ., ., ._! _!_!_. _I_1_J_J_L_. .JL^ 





23 18 17 15 14 



00 



05 


6 


V 



(iii) d = 1 
b = 1 



~ 7 . , , , ", j i Q 36,i", . , . : y, . , , . , ■ 



23 18 17 15 14 



00 



05 


5 


y 



(iv) d = 1 

b = 3 



j mMim 


1 lOKHIiSIf JDDiFIESS IB1SESS FiEUS 


Li_. ■ .-l '• ®s<L , lJLLJ j.. ^^ , .,_,, , . , ...,_,. 


rr^".,.^7.i".i; ; '. , . ,., jf, „.„,„.-.-,...-.„.«,.««..«.-,-«.. 



23 18 17 15 14 



00 



05 


7 


y 



(v) d = 

b = index designator 



16CATIM • |eKMll8lt.»88lflK S MIK5S flEEl 



«G 



23 18 


17 15 


14 




00 


05 


b 




V 





3.6.2 (cont.) 
Description: 



If the instruction is ASG, QSG or ISG; (A lower 15 ), 
(Qlower 15) or ( B ' D ) respectively is compared to "y". 
If greater than or equal, RNI from P+2, otherwise 
RNI from P+l. 

Note: If the (A) or (Q) = xxx77777 or (B^) = 77777, 
the instruction will skip if "y" is either 
77777 or 00000. If the (A) or (Q) = 00000000 
or (B b ) = 00000, the instruction will skip if 
"y" is 00000 but will not skip if it is 77777. 
If sign extension is specified, i.e. the instruction 
is ASG,S or QSG,S the sign of "y" (bit 14) is extended 
and the 24 bit quantity is compared with the quantity 
in the specified register. If the sign bits are different 
the one with a sign bit of zero is larger. 
Note: If the (A) or (Q) = 00000000, the instruction 
will skip if "y" is either 77777 or 00000. If 
the (A) or (Q) = 77777777, the instruction will 
skip. if "y" is 77777 but will not skip if it 
is 00000. 



Examples : (i) If (A) = 00002020 
ASG 2020B 

(A) is equal to y, skip next instruction, RNI at P + 2 

(ii) If (A) = 10000001 
ASG,S 40002B 

y = 77740002 with sign extended 

(A) is greater than y, skip next instruction, RNI at P + 2 

Exercises in SKIP-IF-GREATER-THAN-OR-EQUAL Instruction 

(a) To which STOP location will control jump? 

ENA,S 40000B 

INA 20B 

ASG,S 40040B 

UJP ST0P1 

ASG 40020B 

UJP ST0P2 

UJP ST0P3 

(b) To which location will control jump? 



ENQ 


200B 


QSG,S 


128 


UJP 


ENDING 


UJP 


PAUSE 1 



(c) How many times will the loop be executed? 



EN I 


0,1 


LDA 


PERS0N,1 


MUA 


RATE1 


SHAQ 


24 


DVA 


RATE 2 


STA 


IAa • I 


INI 


1,1 


ISG 


500,1 


UJP 


*-7 


HLT 





3.6.3 Index Skip Incranental/Decremental 



23 18 17 16 15 14 



00 



10 



IKATWU 



d = 0, Index Skip Incremental 



■OFEWmSKJMiFIKS MMKS FKli 



I si , ^:u.,a 



23 18 


17 15 


14 




00 


10 


b 




V 





b = index register designator 
d = 1, Index Skip Decremental 



imnm \ mmknmMmim mm s m a 

| 150 , ._, . : , j,),fe , , , ; 



23 18 17 15 14 



00 



b + 4 



b = index register designator 



Description i If (B, ) - y skip to P + 2 and clear the index register. 
If (B )■ / y BNI from P + 1 and add 1 to (or subtract 1 
from) the index register. 



Examples * (i) ENI 
LDA 
STA 
ISI 
UJP 
HLT 



0,1 

BUFFER, 1 
DATA,1 
9,1 

*-3 



What is this series of instructions doing? 

Answers Moving 10 words from BUFFER to DATA 

(ii) How can the same problem be done using the ISD instead 
of the ISI? 



MI 
LDA 
STA 
ISD 
UJP 
HLT 



9,1 

BUFFER, 1 
DATA, 1 
0,1 
*-3 



Exercise: 



Write a program segment to move 50 numbers from BUFFER to 
locations beginning at STORE. FIND the total of these 
numbers and store the answer in RESULT. 



ill 



STOHE WOBD ADDRESS 



I LOCATfflM 


8PEM1!SHJiDIFirB M8KSS F!E18 


U-._i_ 


**M , :*,* 




1 • 


s 


»!>• .. « i5 « r ■ 



23 18 17 16 15 14 



00 



44 


a 


b 


m 



Description: Stores the lower 15 bits of (a) in' the storage 
location M. The high - order 9 bits of (#) are 
unchanged* 



Examples : (i) 



SWA INST 



(A) = 17603216 



Exercise i 



(ii) 



INST LDA ** 

What will be the contents of INST? 
(INST) = 20077777 (Before) 
(INST) = 20003216 (After) 



INST 



LDA 
SWA 



*+l 
*-l 



Where INST = 76B, what will be the contents 
of words 76B and 77B? 

(763) - 20000076 

(77B) « 44000076 

What, if any, is the difference between the modification 
achieved by the two program segments below? 



Program A 
LDA F0URO6 



Program B 



SWA 



INST 



LDA 
ENA 
STA 



INST 

406 

INST 



INST 



ENA 



F0URO6 0CT 406 



INST 



ENA 



. 3^8 SHJFT JHSTRUGIIONS 

3.8.1 Shift Instruction format 

23 18 17 16 15 14 



00 



fi 


dj 


b 


k 



an operation designator, which is virtually an extension 
of the function code. It differentiates, between 2 
instructions using the same f code. 



e.g. 



SHA 
SHQ 



b = index register designator 

The contents of the index register is treated as a 
15 bit signed number and is used as a shift direction 
and/or number-of -bits modifier. 

k = Shift count, base 

It may be positive or negative (in complement form) 
depending on the direction of the shift. 

Left shift = positive 
Bight shift = negative 

K = shift count, actual 

K = (B b ) + k if b f otherwise K = k if b = 0. 
If the sum is 11111% or larger, subtract 77777g to get 
the true sum, otherwise the sum is the true sum. 
If the true sum is between 00000 and 37777 3, the 
righthand two octal digits are the actual shift 
count for a left shift. If the true sum is between 
40000 and 77777s, tho. complement of the righthand two 
octal digits are the actual shift count for a right 
shift. 



Shift timing if K = + (use only lower 2 digits of K)' 



Ox 
lx 


xO xl x2 
1.3 usee 


x3 


x4 


x5 


x6 


x7 


2x 


1.45 usee 


3x 


1.7 usee 




4x 


1.95 usee 








5x 


2.2 usee 








6x 


2.45 usee 









Mx + xN = 

octal shift 
count 



7x 2.7 usee 



*if K 



-, complement and use the lower 2 digits 
to determine the timing 



3.8.2 Shift A and Shift Q 



23 18 17 16 15 14 



00 



12 


d 


b 


k 



d = 0, Shift A 



SHA " ~~ 



k.k 



23 18 


17 15 


14 




00 


12 


b 


k 



b = index register designator 
d = 1, Shift Q 



23 18 17 15 14 



00 



12 


b + 4 


k 



b = index register designator 



Description * The 24-bit contents of the register are shifted 
according to the magnitude and sign of K (i.e., 
k + b) 

If K is +, instruction is left shift end around 
If K is -, instruction is right shift end off 

e.g. Shift left 6 positions: K = 00006 
Shift right 6 positions? K ■ 77771 

N.B. (i) During right shift, the sign bit is extended 
and the low order bits are discarded. 

(ii) During left shift, the high order bits are 
brought end around. 

(iii) (B ) and k. with their signs extended , are 
added to give K. The computer then senses 
bits 00-05 and bit 23 to determine the 
size and direction of sMft, respectively. 



3.8.2 (cont.) 



Examples 


of Shift A and 


Shift Q 




(i) 


SHA 6 


(A) - 


10203040 




After Shift 


(A) « 


20304010 


(ii) 


SHJ& -6 


(A) = 


12345671 




After Shift 


(A).- 


? 




(A) - 00123456 






(iii) 


SHA -6 


(A) - 


50367123 




After Shift 


(A) « 


? 




(A) - 77503671 






Exercises on Shift A and 


Shift Q 





(a) If (A) = 20000010 

What will be the contents of A after 

SHA 4 
SHA .-4 

(b) If (A) - 21354706 

What will be the contents of A after 





EOT 2001,1 




SHA 8,1 


(c) 


If (q) = 10000001 




What will be the contents of Q after 




SHQ 6 


(d) 


If (q) - 12345670 



What will be the contents of Q after each shift in the 
following? 



EOT 


307,2 


SHQ 


4,2 


SHQ 


-13 



(e) If (LABEL) = 10421045 

What will be the contents of LABEL after 



LDA 


LABEL 


SHA 


-15 


STA 


LABEL 


LDQ 


LABEL 


SHQ 


1404B 


3TQ 


LABEL 



STUDENT NOTES 



INSTRUCTION MODIFICATION 



4.1 SIGN EXTENSION 



4.2 ADDRESS MODES 



Chapter 




4.3 INDEX MODIFICATION OF WORD ADDRESSING INSTRUCTIONS 



4.1 SIGN EXTENSION 

Certain instructions offer the option of extending the sign 
of a t5 °r 17-bit operand by putting a modifier "S" in the operation 
field. 

e.g. ENA,S Oo370B (a) - 00006370 

ENQ,S 764 32B (q) . 77776432 

Examples : 

(i) ASE,S 77777B where (A) - 77777777 

What is EBTI address? 
BUI from P + 2. 

(ii) EBA,S -6 what will be (A)? 

(A) - 77777771 

(iii) EHQ,S 405B what will be iO)? 

(q) - 00000405 

(iv) ENA,S 7B what will be (A)? 

(A) « 00000007 

(v) ESQ, 3 43125B what will be (q)? 

(Q) - 77743125 

(vi) Where (q) « OOO54631B 

Q3E,S 54631B will result in the RNI being 

<,a) P + 1 or (b) P + 2? 

Answer 1 P + 1 

(vii) ASG,S 4367 1B where A » 43671234 

what is HNI? 

Answer 1 "y" extended » 77743671 

(A) is not greater than or equal to "y", 

because "y" is less negative. 

(A) = -34106543 
y = -00034106 

RNI at P + 1 



4.2 ADDRESS MODES 

There are three address modes as follows; 



(a) No address 

e.g. Operand EM 

Shift count SHAQ 

(b) Direct Addressing 



10B 
5 



a » 

m - operand address 

e..g. LDA 45B will load the contents of word 
45B into the A register. 

(c) Indirect Addressing 

a « 1 

e<g* LDA, I m the "I" specifies indirect 
addressing and generates a 
"1" hit in bit 17- 

The best way to explain is with the following flow 
chart and examples. 




Go to M 

Az-mi-t-re a n fw 
..->_>!»..-, — — 

a. b and m 



NO 



YES 



^O— H 



\ YES 
Is a = 0?\_ > 



Add (B b ) to 
m to form M 



O 



G> 



Execute, 
using address 
M 




Examples t 



In the following examples use the contents of these 5 



words 



100 


26000101 


101 


37421623 


102 


00000103 


103 


76543214 


104 


405OO1OO 



(B 1 ) = 2 



Or) = 4 



4.2 (cont.) 

(i) LM 100B 



What will be the (A) after execution? 
(A) = 26000101. 

(ii) LDA,I 100B 

What will be the (a) after execution? 
(A) . 37421673 

(iii) LM,I 100B, 1 

What will "be the (a) after execution? 
(A) = 76543214 

(iv) LDA,I 100B,2 

What will be the (A) after execution? 



4.3 INDEX MODIFICATION OF WORD ADDRESSING INSTRUCTIONS 

The 3200 has 3 Index Registers each of 1 5-bit capacity. These 
Index Registers can be used to modify the address fields of many instructions. 

e.g. LDA STORE will load the contents of STORE into the A 
Register. But LDA STORE 5 L will load the contents of 
(STORE + (B f )) into the A Register, (i.e. if (B T ) - 1, 
it will load STORED l)« 
How is an indexed instruction assembled? 

LDA STORE, 2 where STORE = 00142B will assemble as: 20200142 
Why? 



23 18 17 16 15 14 



00 



20 


a 


b 


m 



a = addressing mode designator 
b = index register designator 

b = 00^ means no index register 

b = 01 2 means index register 1 

b = iOj, means index register 2 

b = 1 1, means index register 3 



Example LDA TAG,1 where 


(B 1 ) = 3 
TAG = 100B 


100 

101 

102 
103 

104 


11111111 


and 


22222222 




33333333 




44444444 




55555555 


(A) = 44444444 




Restrictions on Indexing 








The following instructions cannot 


specify indexing 


LDI ISE 


IMA 






STI ASE 


IMQ 






INI QSE 


MA 






MI 


ENQ 
AQJ 
AZJ 







Exercises on Index Modi fi oat.i 



on 



1 



A block of memory is as shown: 



TABLE 


00000000 




11111111 




22222222 




33333333 


TABLEX 


44444444 




-' -*■ S S s s s s 




66666666 




11111111 



^Additional material 
on Index Modification 
is located in Chapter 
8.3 



4.3 (cont.) 



What will "be the contents of memory as a result of 
the following: 



ENI 


0,1 


LDA 


TABLE ,1 


STA 


TABLEX, 1 


INI 


1,1 


LDA 


TABLE, 1 


STA 


TABLEX, L 


INI 


2,1 


LDA 


TABLE, 1 


STA 


TABLEX,! 



2. 



A block of memory contains the values shown 
100 



TAG 



00000001 



00002222 



00000303 



04040404 



50055005 



06606606 



77777777 



00000000 



11111111 



What will be contained in the block after execution of the 
following instructions: 



ENI 


0,1 


LDA 


100B, 1 


INI 


2,1 


STA 


100B, 1 


ENI 


3,2 


LDA 


100B, 1 


STA 


100B,2 


ENI 


5,3 


LDA 


TAG-6,3 


STA 


TAG,1 


STA 


TAG, 2 



48 -BIT OPERATIONS 



5.1 LOAD AQ 



5.2 STORE AQ 



5.3 SHIFT AQ 



Chapter 




5.1 LOAD AO 



* .. *« 




4 »<IBSrS$ f'MP 




u>/ie>,i 


m,b 








..,.,,.„, 




23 18 17 16 15 14 


00 


25 


a 


b 


m 



a ■ addressing mode designator 

b ■ index designator 
m = storage address. 

Description: Loads Registers A and Q with the two words from 

address M and M + 1 respectively, where M = m + (B b ) 

Example i (SUM48) -=11 11 11 i\ 
(SUM48+1) = 22 22 22 22 



LDAQ 

A 



SUM48 



AQ 



1Q 



li 11 11 n 



22 22 22 22 



Exercises: (i) A block of memory is as follows: 



1111 


1111 


2000 


2000 


6666 


6666 


2323 2323 


0111 


1110 


7070 7070 


3333 4444 



103 
104 
105 

106 
107 
110 
111 



Ihis has been set up by a subprogram, part of 
which wast 



ORGR 
BSS 
FIELD BSS 



100B 

5 

3 



What would be the contents of AQ after execution 
of: 



LDAQ FIELD+3 



5.1 (cont.) 

Exeroi ses t ( Continued) 

(ii) A block of memory is as follows* 



77 


11 11 11 11 


100 


22 22 22 22 


101 


33 33 33 33 


102 


44 44 44 44 


103 


55 55 55 55 


104 


66 66 66 66 


105 


77 77 77 77 



A portion of a program reads: 





LMQ 


TABLE 




LBQ 


TABLE+3 




STA 


TABLE+2 




STQ 


TABLE+1 








TABLE 


BSS 


10 



What would be the contents of the block after 
execution of the above program? 



5.2 STORE AO 



^^__.„_ 



23 18 17 16 15 14 



00 



45 


a 


b 


m 



a = addressing mode designator 
b = index designator 
m = storage address 

Description : Store the contents of Registers A and Q in storage 
locations M and M + 1 respectively. 

Example : (i) If (a) = 1111 mi 

(Q) = 3333 3333 



Exercise : 



i.e. AQ 



11 11 11 11 



33 33 33 33 



3 



What will be the contents of locations I00 fl and 
101q after execution of the following instruction? 

STAQ 100B 

Answer : (00100) = 11111111 
(00101) = 33333333 

(ii) If FIELD = location 204 o 

o 

(A) = 22334455 
(Q) * 66006600 



STAC 



FIELD 



Answer : 



100 
101 
102 
103 

104 
105 
106 



(FIELD) becomes 22334455 
(FIELD + 1) becomes 66006600 



2 1 


3 10 1 


00000000 


11112 2 


00000000 


14 14 10 


00000000 



What will be the contents of the above after 
execution of the following instructions: 



LDAQ 
STAQ 
LDAQ 
STAQ 



102B 
105B 
100B 
104B 



5,3 SHIFT AQ 






23 18 17 15 14 00 



13 



b = index register designator 

Description s The contents of A and Q are shifted as one 48-bit 
register (AQ). 

Everything else is the same as for SHA and SHQ. 
Examples : (i) SHAQ -12 where (a) = 12345677 

(q) = 22223333 
What will he the contents of A and Q? 
(A) • 00001234 

(Q) - 56772222 

(ii) If (A) = 00010444 and (q) = 11335577 

SHAQ 35 

Answer 1 (a) . 66774000 
(q) = 42220455 



STUDENT NOTES 



48-BIT , FIXED POINT, ARITHMETIC 



6.1 ADD TO AQ 



6.2 SUBTRACT FROM AQ 



6.3 MULTIPLY AQ 



6.4 DIVIDE AQ 



Chapter fj^ 



6.1 ADD TO.AQ 



i lK*I!flH 


OPESAIIOH.MOBlFIfRS AlORfSS flfll 






L^ . ^ . : ■ MMliJL LJ ^^ 1(ii 


!• ;>: ',;■ •»:.;-, : 


It:-: : ■-,,■.,:■..,„,■,, ., ,:,,»]„„„ !1„S| !.„.:,. ,.,„ 








23 18 17 16 15 14 




00 




32 


a 


b 


m 



a - addressing mode design 
b « index designator 
m * storage address 
M = m + (B b ) 

Description : Add the 48-bit contents of two consecutive 
locations M and M + 1 to the contents of AQ. 
The sum appears in AQ. 

Examples : 
(i) If 



and 



A | 


'I — 

00000000 | 00 14 76 21 


1 
0P48 1 0P48+1 


i 

00000001 ! 32 41 71 71 



What will be the contents of AQ after execution of the 
following instruction? 



ADAQ 



0P48 



Solution: 



Pinal AQ 



1 ! 32 56 70 12 



(ii) If (A) - 0000 0123 
(Q) - 7000 0000 
(index register 1) = 1 



77 


1004 0404 


100 


0000 0200 


101 


7000 0000 


102 


7777 7713 



What will be the contents of A and Q after execution of 
the instruction: 



ADAQ 



77B,1 



Solution : 
AQ - 



IQ 



0000 0324 J 6000 0000 



6.1 (cont.) 






(i) What will be the contents of AQ after execution of the 
following section of a program? 





MI 




0,1 




ENA 




2431 4B 




STA 




100B,1 




INA 




14741B 




JSI 




1,1 




STA 




100B,1 




ENA,S 




34567B 




ENQ,S 




15677B 




ADAQ 




100B 


(ii) If (TAG) 


= 0202 


0303 




(TAG+1) 


« 0404 0505 




(A) 


- 2662 


6626 




(Q) 


- 1457 1406 





What will be the contents of A and Q after execution 
of the following instruction? 

ADAQ TAG 



6.2 SUBTRACT FROM AQ 



IflMTIO* 


OPER»TteN.MIDin»S ftilKSS REil 




S8f)Q,I mi* 


_.-... •:. • • = ■•■:.... ^-.„-.^,,...,, r ^. ,.„„,. 



23 18 17 16 15 14 



00 



33 


a 


b 


m 



a « addressing mode indicator 
b - index designator 
m ■ storage address 
M = m + (B b ) 

Description: Subtract the contents of 2 consecutive 

locations H and H + 1 from the contents of 
AQ. The difference appears in AQ. 



Examples : 
(i) 


A 


IQ 


00000001 


1 

! 00000000 




TAG 


1 

(TAG+1 




00000000 


j 7 7 7 7 7 7 7 7 


SBAQ 


TAG 

A 


1 
1° 


Final AQ - 


00000000 


i 

j 00000001 



(ii) If (A) - 

(Q) - 0000 0003 

(tag) » o 

(TAG+1) = 0000 0004 

What will be in A and Q after execution of the 
following instruction? 



SBAQ TAG 



Answer : 



00000000 100000003 



TAG 



minus 



jTAG+1 



oooooooo 


(00000004 


A 


1 


77777777 


i 

[7777777 6 



(using end around borrow in the subtraction) 



6.2 (cont.) 

Exercises 



(i) (A) . 0005 7777 

(Q) « 7777 0000 

(TAG) - 0000 0234 

(TAG+l) = 5670 0000 

What will be in A and Q after execution of the following 
instruction? 

SBAQ TAG 

(ii) A block of memory is as showm 



100 


21 


21 


21 


21 


101 


00 


00 


01 


35 


102 


21 


64 


16 


45 


103 


14 


14 


21 


21 


104 


00 


00 


00 


27 


105 


77 


77 


77 


77 


106 


56 


56 


57 


57 



What will be the contents of AQ after execution of the 
following instruction? 



ENQ,S 





ENA,S 


2222B 


SBAQ 


101B 


SBAQ 


104B 



6.3 MULTIPLY AQ 



JJWfiM ; jOHMIIMJTOFitaS MOHOS FJE1B 



23 18 17 16 15 14 



00 



56 


a 


b 


m 



a ■ addressing mode designator 
b * index designator 
m » storage address 

Description * The instruction uses the 48-bit B register to extend 
the precision of AQ (by forming AQE). 

Muliply the contents of AQ by the 48-bit operand in , 
two consecutive locations M and M + 1, where M = m +■ (B ) 
The 96-bit product appears in AQE, with the least signif- 
icant bits inE. 



Example : 



A 


IQ 


00000000 


[7 6000000 


TAG 


| TAG+1 


00000000 


0000002 



MUAQ TAG 

The final results in AQE = 
Q E 



ooeooooo 



00000000 



00000 001 74000000 



Ezercisei 



A block of memory is as shown 400 

401 
402 
403 
404 
405 



00 


00 


01 


11 


00 


00 


00 


00 


00 


00 


00 


07 


25 


37 


32 


10 


24 


24 


42 


44 


00 


00 


17 


07 



What will be the contents of AQE after execution 
of the following instructions? 



LDA 


404 B 


S3A 


405b 


STA 


404 B 


LDQ 


404 B 


LDA 


400B 


MUAQ 


401B 



6.4 DIVIDE AQ 



i IKMM 


i j e?EI*iiNjeiFIEK SIMBS FIEll 






0MQ, J m,> ,,,,,., 




L iii i:.:>il!* 


.. ; j L. ! ,.:, ;! :, i; .:„:,.„ r :,.|,,|«:,::, i |,.| i .,»,,,.,»„,,»^ 


„,„^:,„» ! „„.. 



23 18 17 16 15 14 



00 



57 


a 


b 


m 



a « addressing mode designator 
b = index designator 
m = storage address 
M = m + (B b ) 

Description : Divide (AQE) by the 48 bit contents of two 

consecutive addresses, H and M + 1. The answer 
appears in AQ, and the remainder, with sign 
extended, in E. 



Example * 
~~K 



&. 



.£. 



00000000 100006743 I 2^6 54317 4; 20000000 



TAG 



DVAQ TAG 



TAG+1 



00000001 ' 00000 



Answer is in A-<t 



A 


,Q 


00006743 


! 26 5 43174 



Remainder is in S 
(Sign extended) 



E 




00000000 


20000000 



flote t If a divide fault occurs, this operation 
halts, and the program advances to the 
next instruction. 

The final contents of AQ and E are meaningless 
if this occurs. 



STUDENT NOTES 



LOGICAL OPERATIONS 

7.1 LOGIC TABLES 

7.1.1 Logical "AND" 

7.1.2 Inclusive "OR" 

7.1.3 Exclusive "OR" 

7.1.4 Examples of Logical Operations Using Octal Numbers 



7.2 LOAD A LOGICAL 



Chapter frjj 



7.3 LOAD COMPLEMENTS 

7.3.1 Load A Complement 

7.3.2 Load AQ Complement 

7.4 LOGICAL "AND" OPERATIONS 

7.4.1 Logical Product A 

7.4.2 AND of A and y 

7.4.3 AND of Q and y 

7.4.4 AND of Index Register B b and y 

7.5 EXCLUSIVE "OR" OPERATIONS 

7.5.1 Selectively Complement A 

7.5.2 Exclusive OR of A and y 

7.5.3 Exclusive OR of Q and y 

7.5.4 Exclusive OR of Index Register B and y 



7.6 



SELECTIVELY SET A 



7.1 LOGIC TABLES 

7.1.1 Logical "AND" (Logical product) 



A 


B 


C 




1 
1 



1 

1 






1 



Note; C is only a "1" if both 
A and B are "l's". 



Example . AND of 1001 and 1010 (binary numbers) 



1001 
1010 

1000 



7*1.2 Inclusive "OR" (Selective Set) 



A 


B 


c 





1 
1 



1 


1 




1 
1 
1 



Note: C is a "1" if either or 
both A and B are "l's". 



Example t Inclusive OR of 1001 and 1010 

1001 
1010 



1011 



7*1.3 Exclusive "OR" (Selective Complement) 



A 


3 


n 




1 
1 



1 

1 




1 

1 





Note: C is a "1" only if 

A and B are different. 



Example i Exclusive OR of 1001 and 1010 

1001 
1010 

0011 



7.1.4 Examples of Logical Operations Using Octal Numbers 

(i) What is the logical "AND" of 43B and 62B? 
Answer s 42 B 
(ii) What is the exclusive "OR" of 7021B and 33B? 
Answer i 701 2B 
(iii) What is the inclusive "OR" of 361B and 403B? 

Answer * 763 B 
(iv) What is the exclusive "OR" of 361B and 777B? 
Answer J 416B 



7.2 LOAD A LOGICAL 



Lt)L,l m,t> 



23 18 17 16 15 14 



00 



27 


a 


b 


m 



a = addressing mode indicator 
b = index designator 
m = storage address 
M = m+ (B b ) 

Description : A is loaded with the logical product (AND) of Q and 
the contents of location M. In this instruction, Q 
serves as a mask. 



Q 


M 


A 














1 





1 








1 


1 


1 



Note: The bit in A is 
a "1" only if 
both of the 
corresponding 
bits in Q and M 
are "1's". 



Examples : 



(i) LDL 



100B 



100 


32470235 


101 


12345670 


102 


246O1357 



(A) = 30470230 
(ii) If index register 3 contains 00002 
LDL 100B,3 
M = 00100 + 00002 
= 00102 

octal binary 



Q= I 70770770 I 



(00102B) = 24601357 



8 



(Q) = 70770770 8 



010 100 110 000 001 011 101 111 2 
111 000 111 111 000 111 111 000 2 



(A) = 20600350s 010 000 110 000 000 011 101 000 2 



Answer: (A) = 20600350 



7.3 LOAD COMPLEMENTS 
7.3.1 Load A Complement 



! Whim 


I jGPHMWIf JIMF1HS UiKSS FKIS 


LCA, I , , : rn,b , , ,..,,,> > . , ■, -, , 


h :..>,.:>:!. 


■ IlL ! *,,:::j; J. ..■!!::«.. i|i"l*!«."i«l«l»»l»L«l"i»i«i'«i>'i»J»»i":»^l ,, i 



23 18 17 16 15 14 



00 



24 


a 


b 


m 



a » addressing mode indicator 

b = index designator 

m = storage address 

Description : The instruction load A with the complement of 

the 24-bit word located at M, where M * m + (B ) 



Examples : 



(i) LCA 



100B 10C 36476521 
101 1 67543210 



(a) - 41301256 



102 42454251 



10 3 72130215 



(ii) If index register 2 contains 00003 

LCA 100B, 2 M = 00100 + (B 2 ) = 00103 

(a) = 05647562 



7.3.2 Load AQ Complement 



%mtm "; wmiiw.itiiTOS mh kstoh 



23 18 17 16 15 14 



00 



26 


a 


b 


m 



a * addressing mode indicator 

h = index designator 

m ■ storage address 

Description : The instruction loads A with the complement of ^ 
M, and Q with the complement of M + 1, where M = m + (B ) 

Examples : 

(i) LCAQ- 100B (using example above) 

(A) = 41301256 

(Q) = 10234567 

(ii) If index register 3 contains 00002 

LCAQ 100B,3 H - 00100 + (b3) = 00102 

(A) » 35323526 
(Q) = 05647562 



7.4 LOGICAL "AND" OPERATIONS 
7.4.1 Logical Product A 



10MI8M 





GHfilUWif.iilDiFIHS UiKSS Fill! 




LPAfl w , , 


„ J.!. , , ..,„.,'« .,- -,;„ , -iE , „,.-„ -,-„,,. SHL „: 






23 18 17 16 15 14 


00 




37 


a 


b 


m 



a = addressing mode designator 
b = index register designator 
m = storage address 



Description : Heplace (A) with the logical .product of (A) and (M) 
(logical AND) 

Examples : (i) LPA 100B where (lOO) » 55555555 

(A) * 52525252 

What will (A) be after execution? 

(a) = 50505050 

(ii) LDA MASK where (MASK) = 77777777 
LPA CI0X and (CI0X) = 43752016 

Answer (A) « 43752016 

(iii) MA,S 20301B where (MASK) = 77777777 
LPA MASK 

Answer (A) = 00020301 

(iv) LDA STATUS where (STATUS) = 10203040 
LPA STATMASK (STATMASK) = 76543210 

Answer (A) - 10003000 



7.4.2 AND of A and 



10MIIM 


1 iOPEMTIM.MQMFiHS ABDIESS FIEU 






UmuJWuui,,,', 




.... ..,.,. - 


*>!»'!»!«! 





23 18 17 16 15 14 



00 



17 


(!■ 


b 


V 



b = 0, if sign extensi< 



! iwiim \ 


WfMiSMJlllFKSS AHSCSS Fill! 


(,,:,!*,! i4Af4,iS, ,., : ;y .,.,,,.. , 


|.:.,M.:-:.....[,i; ,-. -.-J,.., ,,. ,.,„„„,„,,„, 




23 18 17 15 14 00 




17 


4 


v I 




b = 2, if no sign extension 


| tfiSHIM 


»£MTSSO80IFMS MSKSS FIRS 


I.., Mi!l J 


AAM ... ..*,.... . 


L, ; , ,,,, ,., ,,, i ,!:„„.., ..,..,.,.,.., ,.„:„„..„,„„,,„„_, 




23 18 17 15 14 00 




17 


6 


y 



Description; Enter the 24 bit logical product of (A) and y (with 

sign extension if specified) into A. If sign extension 
is not specified, zeros are extended rather then the 
sign of y. 



Note: The bit in A is a 
"1" only if both 
of the corresponding 
bits in A and y are 
"l's". 



A 


Y 


A 














1 





1 








1 


1 


1 



Examples : (i) ANA 



23456B 



Where $.)= 12345670 
00023456 

00001450s 



(ii) AHA,S 



23456B 



001 010 010 100 101 110 111 000 

000 000 000 010 011 100 101 no 
000 000 000 000 001 100 101 ooo 2 



Where (A) « 07654321 
00023456 

00000000 8 



(iii) ANA,S 



43456B 



000 111 110 101 100 011 010 001 

000 000 000 010 011 100 101 110 
000 000 000 000 000 000 000 OOO2 



Where (A) « 07654321 
076400008 



(iv) ANA,S 



70707B 



000 111 110 101 100 Oil 010 001 

111 111 111 100 011 100 101 no 

000 111 110 100 000 000 000 OOO2 



Where (A") . 11111111 
77770707 

11110101s 



001 001 001 001 001 001 001 001 
111 111 111 111 000 111 000 111 

001 001 001 001 000 001 000 ooi 2 



7.4.3 AND of Q and y 



| 10MISBN 


iO?£MIIOK,UO!)lFiEBS JBfiMSS F1ELB 




A«fft.§,.,_ L aL. J .^u 1 _ L ^ L x. J ._L,. 


|. z,^, :,:«,, ;, 





23 18 17 16 15 14 



00 



17 


1] 


b 


y 



b = 1, if sign extension 



mmm 


iQFC^ATiON.ttODirfERS MBSESS HUB 


■ L_i " <_i - 


W>*_,^ &, o^lu ,,.,.,,.,., 


■:»..!• I»i«l' i»l 





23 18 


17 15 


14 00 


17 


5 


V 


b = 3, if no sign extension 



I WMIitt 


!0P£ft*T!6M : M00ifIIRS MBKSS FIJll 






\ANQ y 


i:..,i!.±U-J.i: : .L i .;.,L 


• ' _> •> • >*..* « ._ > < 


».;«.&: 



23 18 17 15 14 



00 



17 


7 


V 



Description: Enter the 24 bit logical produet of (Q) and y (with sign 
extension if specif ied) into Q. If sign extension is not 
specified, eeros are extended rather then the sign of y. 

Examples: As for ANA,S y 



7.4.4 AND of Index Register B and 



23 18 17 16 15 14 



00 



17 



b ■ index register designator (1-3) 

Description : Enter the logical product of (B D ) and y into index 
register b. 

Examples : (i) ENI 77B, 3 
ABI 12B, 3 
Index 3 contents «= 00077 
"AND" with 00012 
00012 
Answer » 00012 in index register 3 



7, 


.4.4 (cont. 


.) 






Examples: 


( Continued) 








(ii) Btt 


12345B,2 






ABI 


25252B,2 






(Index 3) 


- 12345 






"AID" with 25252 








00240 



Answer s 00240 in index 2 



7.5 EXCLUSIVE "OR" OPERATIONS 

7«5« 1 Selectively Complement A 

; SCAyl .". . _. m^h ~ ^ ~~~~ ~ 

23 18 17 16 15 14 00 



36 


a 


b 


m 



a = addressing mode designator 
b = index register designator 
m = storage address 

Description: Selectively complements corresponding bits in A for 
all 1-bits at address M. (Exclusive OR) 

Examplest (i) SCA 100B where (lOO) - 70707070 

(A) - 52525252 
What will (A) be after execution? 
Answer : (A) = 22222222 

(ii) MA,S 77777B where (MASKS) = 10203040 
SCA MASKS 

Answer : (a) = 67574737 

(iii) MA,S 40001B where (SIGN) = 40000001 
SCA SIGN 

Answer » (A) -f 37740000/-^^ 

(iv) LDA TAG where (TAG) = 77777777 
SCA SETBIT (SETBIT) = 52525252 

Answer : (A) = 25252525 

(v) LM GTRG where (GTRC) = 40000001 
SCA GTRC 

Answer : (a) = 0000 0000 



7»5»2 Exclusive OR of A and y 



IdMTISN I itPEIMTIM.MSUFIEK HBWESS FIELD 



,s 






23 18 17 16 15 14 



00 



16 


!i 


b 


y 



b = 0, if sign extension 



mmm 


\ tg?ES*T!0N . M06IFIESS ASfiKESS FIEIO 




. ! MA,? , . u 







23 18 


17 15 14 00 




GZ 


4 


y 




b = 2, if no sign extension 


| LOCiTitH 


IsMMflMjestrras mm%% fieis 


! ...... . 


i^ ...... :h ......... , ,,..,,-..,.^. 




J:. L .,.: ii ,»... i .«.:....:.. 1 «i» 1 j U 5ii2!^»iaj«uaaii»"jjcia^ 



23 18 


17 15 


14 




00 


16 


6 


y 



Description: Enter the 24 bit exclusive OR of (A) and y (with sign 
exteens&on if specified) into A, If sign extension .is 
not specified, zeros are extended rather then the sign 
of y. 



Note: The bit in A is a 
"1" only if the 
corresponding bits 
in A and y are 
different. 



A 


y 


A 














l 


1 


1 





1 


1 


l 






Examples t (i) X0A 44444B 

3 8 -=011 2 



if A - 33333333 



OR 



4g « 1002 
T 8 = 111 2 



33333333 
00044444 



33377777 



= answer 



(ii) X0A,S 44444B if A J 33333333 



44444 is a negative number since 4s = IQ0 2 ; 
therefore, find exclusive OR of (A) and 77744444« 

3 8 = 011 2 

7 8 = 111 2 

OR = 4 8 = 100 2 

3333 3333 
7774 4444 



4447 7777 



answer 



7.5.2 (cont.) 



(iii) X0A,S 40001B 
Where A = 20117070 

40001 is negative and equals 77740001 with sign 

extended, therefore 

20117070 
77740001 



Answer: (A) = 57657071 



7.5.3 Exclusive OR of Q and y 



57657071 
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b = 1, if sign extension 
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b = 3, if no sign extension 
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Description; Enter the 24 bit exclusive OR of (Q) and y (with sign 
extension if specified) into Q. If sign extension is 
not specified, zeros aire extended rather then the sign 
of y. 

Examples: As for X0A,S 



7.5.4 Exclusive OR of Index Register B b and y 
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b * index designator (l-3) 

h b 

Descriptions Enter the exclusive OR of (B ) and Y into B 

No sign extension is possible on either (B ) or y. 

Examples \ (i) X^I 77B, 1 

where index 1 contains 32B 

00032 = 000 000 000 Oil 010 
00077 = 000 000 000 111 111 

000 000 000 100 IOI2 = 00045 8 

Answer : Index register 1 will contain 45 B 

(ii) X0I 77777B,2 

Where index register 2 contains 74321 B 
74321 = 111 100 011 010 001 
77777 = 111 111 111 111 111 

000 011 100 101 110 2 = 034568 
Answer s Index register 2 contains 345^B 



7.6 SELECTIVELY SET A 
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a = addressing mode designator 
b = index register designator 
m = storage address 

De scrip ti on t Selectively set 1-bits in A for all 1-bits in M 

N.B. This instruction leaves "1" bits which were 
already present in the register* i.e. it does 
not clear A before execution. 

This instruction is performing an "inclusive OR" 
operation. 

Examples . (i) SSA 100B where (lOO) * 70707070 

(A) - 52525252 

What will (A) be after execution* 

(A) = 72727272 

(ii) ENA,S where (ABIT) = 76543210 
SSA ABIT 

Answer* (a) - 7654321O 

(iii) ENA,S 21010B where (M0D) = 11111111 
SSA M0D 

Answer 1 (A) - 11131111 

(iv) ENA,S 44444B where (M0D) = 11111111 
SSA M0D 

Answer: (a) ■ 77755555 



CHARACTER MODE OF OPERATION 



8.1 



INTRODUCTION 



8.2 CHARACTER ADDRESS INSTRUCTIONS 

8.2.1 Load A Character 

8.2.2 Load Q Character 

8.2.3 Store A Character 

8.2.4 Store Q Character 

8.2.5 Store Character Address 

8.2.6 Enter Character Address into A 



Chapter fcj 



8.3 INDEX MODIFICATION OF CHARACTER ADDRESSING INSTRUCTIONS 



8.1 INTRODUCTION 



Data may be stored in two ways in the 3200. It may "be stored 
in full words - that is, the information stored in 24 bits. Or, it may 
he stored in character form . 

Each word in the 3200 may be broken up into four 6-bit 
characters, which are called characters 0, 1, Z and 3 in the particular 
word, as shown i 

23 18 17 12 11 06 05 00 






1 


2 

____________ 


3 



Information may be stored in characters, instead of in words, 
for convenience and economy. For instance, if we wish to store fifty digits, 
it could be more convenient to store them as 50 characters, to take up only 
12^ words of storage, rather than put each digit into a separate computer 
word. 

The computer is able to address any character in any word in 
storage. To find the character address of any particular character, the 
word address of the word containing the character is multiplied by 4} 
and the character position is added on. 

The process is simpler if the arithmetic is done in binary. 
To multiply by 4 in binary you suffix two zepos to the righthand end of the 
number. The character positions are (in binary) 00, 01, 10 and 11. 
Therefore to find the character address* 

(i) Change the word address to binary 

(ii) Add the character position in binary as 2 extra 
low order bits 

(iii) Convert back to octal 
Examples Character 2 in word 104 

(i) Binary - 001 000 100 * f—Character position 

(ii) Add on character position=00l 000 100 10 
After regrouping bits * =00 100 010 010 
(iii) Convert to octal = 422B = Character Address 

Exercise * Find the character addresses of the following characters. 

Word Address Character Position Character Addrasa 

100 3 

405 1 

t02l 

477 2 

4001 1 

2664 

17777 3 



Similarly, if we know a character address, we can determine 
the word address in which the character is contained, and its position 
In the word. 



8.1 (cont.l) 

The steps arei 

(i) Convert to binary 

(ii) Semove the last two binary digits. (These are the 
character position) 

(iii) Convert the remainder to octal. 

Example * Character address 422 

(i) Binary = 100 010 010 

(ii) Divide by 4 = 100 010 2 Remainder = IO2 = 28 = Character 

(iii) Regrouped = 1 000 IOO2 Octal = 104 = word 

Address 

Answer - Character 2 in word 104 



Exercise : (i) Find the word address and character position of the 
following character addresses: 



(a) 201 

(b) 3 

(c) 417 

(d) 555 



(e) 2110 

(f) 4231 

(g) 16524 
(h) 66666 



(ii) What is the smallest character address? 

I A -i -1 1 UT^q + no +Vi^ To T»rrzic»-H r*Via-no r»+. <=*t» aHHT>oao -in art HIT 

computer? 

(iv) What is the largest character address in an 32K 
comput er? 



Character Address Instruction Format 

The instruction format enables the address of a particular 
character in a word to be specified. 



23 



18 17 16 



15 14 



00 



(6 bits) 


(1 bit) 


(17 bits) 



i storage address 

16 15 14 13 02 01 00 



Storage Field 


Y 

Co-ordinate Address 


Character 


Module 


within field 


0-3 


0-3 0-1 


0000-7777a 





Character-Addressed Instruction Format 

(i) Function Code (f) 

6 bit code of action to be carried out. 
(ii) Operation Designator (d) - 1 bit 

If d * 1, modify address "m" by contents of a 
set index for the particular instruction. 

If d « 0, no modifications. 

(iii) Storage Address (17 bits) 

The address of -the character required is specified. 
This may be broken up into the module, field and 
co-ordinate address, as for word addressing, plus 
two'bits to indicate the character position in the word- 



8.1 (cont.2) 

Exercise : 

Assume that the following block of memory is in Field 1 of an 
8K computer. What will he the character addresses o f the characters 
marked x? The co-ordinate address of the first word in the block is 
3124 Q . 



i I * 

XI | I 

— '■ 1 1 — 

• ,x I 

1 1 1 — 

X I I I 

I I I 

-^ — i — n 



8.2 CHARACTER ADDRESS INSTRUCTIONS 



1.2.1 Load A Character 



:s?em!|M jiwras muss ncn 



23 18 17 16 



00 
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m 



m = 17 bit character address 

b = index designator - but can be only 

one bit, so has special use. See section 
on indexing(section 8.3). 

Description s Clears (A) and loads into bits 00-05 of A, the 

contents of the character specified by M. (m + (B )) 



Examples : 



(i) LACH 



403B 



(A) « 40012431 

(100) = 01020304 

(400) * 05060701 

(403) = 02030405 

What will be the contents of the A Register? 

(A) = 00000004 since 403B (char.) 

= 100B (word), poso 3. 



(ii) LACH 5B 

What will be the contents 
of the A Register after 
execution? 



(A) = 00000034 
(iii) LACH HRTABLE+3 

HRTABLE BSS 4 

What will be the (A) after execution? 

(A) » 00000067 

(iv) In (iii) what would be the (A) if the instruction was 
LACH HRTABLE+13B 
(A) - 00000044 
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8.2.2 Load Q Character 
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Description: Same as LACH except substitute Q Register for A Register, 
and it uses a different index register (which also is 
different from SQCH) 



8.2.3 Store A Character 
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m = 17 bit character address 

b = index designator - but can be only 

one bit, so has special use. See section 8.3 
on indexing. 

Description* Store the contents of bits 0-5 of the A Register in the 
specified character address. 

N.B. The contents of A and the remaining 3 characters 
in the storage word, are unchanged. 



Examples : 



(i) SACH 43B if (a) 20012345 

Wdch character position of which word is affected, 

and what will be the contents of the character position? 

Answer : (l) Word 10 

(2) Position 3 

(3) 45B 

(ii) SACH L0C+3 (a) - 11560133 



U6c BSS 5 

What changes will be made to 
the 5 words shown? 

(L0C) = 00112233 
i.e. no change I 



L0C 
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05 


06 07 00 
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34 56 07 



8.2.4 Store Q Character 
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Description ; Same as SACH except substitute Q register for A register, 
and it uses a different index register (which also is 
different then that used by LQCH) 



8.2.5 Store Character Address 
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a = addressing mode designator 
b = index register designator 
m = storage address 

Description : Stores the lower J7 b its of (A) in the lower 17 bits of word 
M. The upper bits of M and the whole of A are unchanged. 
The instruction is used for character address modification. 
Compare with SWA instruction* 

Examples : 

(i) SCHA 50B (A) =10747021 

(50) = 23064513 

What will be the contents of 50 after execution? 

(50) = 23347021 

(ii) Location Instruction Assembled as 

100 SCHA *+1 46000101 

101 LACH ** 22377777 

If (A) = 11117643 when 100 is executed, what will be the 
contents of 101 after execution? 

Answers (1O1) = 22117643 



8.2.6 Enter Character Address into A 
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d = 0, if no sign extension 
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d = 1, if sign extension 
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Description: Enters the 17 bit quantity "y" into the A register. 
When d = 1, the sign of the quantity (2 16 bit) is 
extended in A. When d ~ 0, the upper 7 bits of the 
A register are set to zero. "y" is usually a character 
address. If "y" is a symbolic word address, the actual 
machine address is multiplied by 4 before it is assembled 
in the instruction. 

Examples: (i) It 0UTBUF is character position 3 in the word at 
word address 100, what would be the contents of A 
after: 

ECHA 0UTBUF 

Answer: (A) = 00000403 

(ii) What would be the contents of A after execution of: 

ECHA 117640B 

Answer: (A) = 00117640 

(iii) If TABLE starts at word address 40000, what would be 
the contents of A after: 

ECHA TABLE 
Answer: (A) = 00200000 

ECHA,S TABLE 
Answer: (A) = 77600000 



8.3 INDEX MODIFICATION OF CHARACTER ADDRESSING INSTRUCTIONS 
Character address instructions have limited indexing ability. 



m (17 bits) 



b is only one bit, therefore it can only indicate whether 
a specific index is used or not used. 

i.e. If the M b" bit is ? set, the address is modified by 
either (B ) or (B ) depending on the particular 
instruction. 

LACH m, 1 

LQCH m, 2 

SACH m,2 

SQCH m,l 

Also, if the 'm 1 address is at one or the other end of a 
table, the table is limited in length to 16383^q characters. 

i.e. If TABLE equals word address SOOOOB (character address 
100000B) and the instruction is: 

LACH TABLE , 1 

(i) and (Bi) - 40000B 77740000 

00 100000 
the character address referenced = 040001 

(ii) or (Bl) = 77776B 77777776 

00.100000 
the character address referenced = 077777 

(iii) or (B 1 ) = 00000B 00000000 

00100000 
the character address referenced = 100000 

(iv) or (B 1 ) = 00001B 00000001 

00100000 
the character address referenced = 100001 

(v) or (B 1 ) = 37777B 00037777 

00100000 
the character address referenced = 137777 



Note: If the index register contains 40000 thru 77776 
the reference is backward in memory, whereas if 
the index register contains 00001 thru 37777 the 
reference is forward in memory. This means that 
when writing programs in COMPASS, FORTRAN, ALGOL 
or COBOL one should be careful not to exceed 
16383^0 when defining character arrays. 



8.3 (cont.) 



Examples : In the following examples assume the contents of the 
index registers to bes 



(B 1 ) 
(B 2 ) 
(B 3 ) 



5 

2 
-3 



(i) LM LABEL+1,3 



STA 
LDQ 



LABEL, 2 
LABEL, 2 



What will be the contents LABEL 
of Q after execution of the 
program segment above? 



(Q) = 22222222 

(ii) LACH LABEL, 1 

What will be the contents of A? 

Answer (A) = 00 00 00 55 



11111111 



22222222 



33333333 



44444444 



55555555 



66666666 



77777777 



Exercises; 



1. A block of memory (maximum length = 100 words) contains 
numbers stored one to a word. The end of the list is 
indicated by a word containing BCD blanks. Write a routine 
which will add the numbers in the list. (Use indexing.) 
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consecutive memory locations. 
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3. Transfer 17 words located 5 memory locations apart, into 
17 words located 10 memory locations apart. 



4. Calculate the sum of the octal numbers 0-14. 



INTER-REGISTER TRANSFERS 

9.1 TRANSFERS BETWEEN THE A REGISTER AND INDEX REGISTERS 

9.1.1 Index Register to A Register 

9.1.2 A Register to Index Register 



9.2 



9.3 



TRANSFERS BETWEEN THE A REGISTER AND THE REGISTER FILE 

9.2.1 Register File to A Register 

9.2.2 A Register to Register File 



Cha 



pter Er*J 



TRANSFERS BETWEEN THE ° REGISTER. AND THE REGISTER. FILE 
9.3.1 Register File to Q Register 



9.4 TRANSFERS BETWEEN INDEX REGISTERS AND THE REGISTER FILE 

9.4.1 Register File to Index Register 

9.4.2 Index Register to Register File 



9.5 INTER-REGISTER ADDITION 

9.5.1 Add Contents of Q to Contents of A 

9.5.2 Add Contents of Index Register to Contents of A 

9.5.3 Add Contents of A to Contents of Index Register 



9.1 TRANSFER BETWEEN THE A REGISTER AND INDEX REGISTERS 
9.1.1 Index Register to A Register 

'< iOCATIOM OT8»1WN .MiSIFHK MBRrSSJTO _____ 
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b = index designator (1-3) 
bits 0-11 are not used 



Description ! Transfer the I5~bit contents of index register B 
to A. (A Register is cleared before the transfer 
is done.) 

Example * 



If B2 contains 54321 and A contains ! 700 3 2146 
TIA 2 

(a) clear A . 0000 0000 

(b) transfer 15 bits in B 2 to lower 15 bit positions of A 

(A) - 0005 4321 



9*1.2 A Register to Index Register 
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b = index designator (1-3) 

Description * Clear index register B , and transfer the lower 15 
• bits of (A) to it. 



Example* 



If B 3 contains 21B and A contains 
TAI 3 

(a) Clear Index 3 

(b) Load it with lower 15 bits of A 

(B 3 ) = 31000 



7643 1000 



9.2 TRANSFERS BETWEEN THE A REGISTER AND THE REGISTER FILE 

(The Register File is a special high speed memory of 100q locations 

numbered from OOs - 77g.) 
9.2.1 Register File to A Register 
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m = Register File Address (00-77) 
Bits 6-11 and 1*5 - 16 are not used. 

Description ! Transfer the contents to Register file m to A 
A is cleared prior to the transfer. 

Example : If A « 0000 0006, and Register file 20 » 0000 0014 , 
what will be in A after execution of the following 
instruction? 

TMA 20B 

Answer : (a) A is cleared 

(b) Contents of Reg. File 20 put in A 

(A) = 00000014 



9**2.2 A Register to Register File 
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m = Register File Address (00-77) 
Bits 6-11 and 15 - 16 are not used. 

Description . Register file m is cleared, and the contents of 
the A register are transferred to m. 

Example * If (A) - 0000 1000 

Register file 30 = 0000 0777 
TAM 30B 

Answer: (a) Register file 30 is cleared 

(b) Contents of A placed in Reg. file 30 

(Reg File 30) = 00001000 



9.3 TRANSFER BETWEEN THE Q REGISTER AND THE REGISTER FILE 
9.3.1 Register File to Q Register 
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Description: As for TMA except uses Q register 



9.3.2 Q Register to Register File 



; LOCftTiON 


3?Br'6s mwnn umin fihs 






: TOM _ * , ^ _^ . 






_ __ _ •_ ._» .-^•Ja_ - 





23 18 17 16 15 14 )i2 11 06 05 00 

l I JJJIiJJJJ I I JJJJJJJJA I 



53 



m 



M ) mm 



Description: As for TAM except uses Q register 



9.4 TRANSFER BETWEEN INDEX REGISTERS AND THE REGISTER FILE 
9«4»1 Register File to Index Register 
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b = index register designator 

m = register file address (00-77s) 

bits 06-11 are not used 



Description * Transfer the lower 15 bits of Register m to Index 
B . Index is cleared before transfer. 

Example : Index register 3 contains 000 10, and 
Register file 25 contains 0000 2000. 

What will be in B 3 after execution of the following 
statement? 



TMI 



25B.3 



(a) Index 3 is cleared 

(b) Lower 15 bits of Register file 25 are put in it. 
i 



B- 



02000 



9.4.2 Index Register to Register File 
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b = index register designator 

m = register file address (00-77s) 

bits 06-11 are not used 

Descriptiom Clear Register file,M, and transfer to it the contents 
Of index register B . 

Example » (i) Index 3 contains 22B 

TIM 26B,3 



(H 26>= 



0000 0022 



9.5 INTER-REGISTER ADDITION 

9.5.1 Add Contents of Q to Contents of A 
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Description * Transfer the contents of A plus the contents of Q 
to A* No information is given in the address field 
in this instruction. 

Example ! If GO- 0000 1000 
(Q> 0000 4104 

What will be A after execution of the following instruction? 

AQA 

Answer : (A) and (q) are added together and put in A 

(A) = 00005104 



9.5.2 Add Contents of Index Register to Contents of A 
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b = index register designator (1-3/ 



Description * Transfer the contents of^A plus the contents of B 
Example t 



to A. The oantents of B D is sign extended to perform 
the addition «■ 
If (A)« 0000 0100 



( B 2) « 01404 

What *ill be in A after execution of the following 
instruction? 



Answer i 



AIA 



(A) and (B„) are .added and the result stored in A 
(A) = 00001504 



9.5.3 Add Contents of A to Contents of Index Register 
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b = index designator (1-3) 

Description * The contents of A are added to the contents of Index 
Register (B") and the result stored in B . The sign 
of the original B^ is extended prior to addition, and 
only the lower 15 hits of the answer are placed in B". 



Example * 



Exercises: 



(B 2 ) 

(A) ■ 



00006 
0000 0007 



What will he the contents of index register 2 after 
execution of the following statement? 

IAI 2 

Answer * (B z ) = 00015 

(i) If (B 3 ) - 40001 

(A) » 0000 000? 

3 
What will he the contents of B after execution 

of the following instruction? 

IAI 3 

(ii) If (B 1 ) - 40001 

(A) = 1000 0007 

What will be the contents of B after execution 
of the following instruction? 



IAI 



1 



STUDENT NOTES 



SEARCH AND MOVE OPERATIONS 



10.1 BLOCK CONTROL 



10.2 SEARCH OPERATIONS 

10.2.1 Search for Character Equality 

10.2.2 Search for Character Inequality 

10.3 MOVE INSTRUCTION 



10.4 PAUSE INSTRUCTION 

(as used with SEARCH/MOVE Instructions) 



Chapter | [fj 



10.1 BLOCK CONTROL 

Block control is an auxiliary control section within the 
3200 processor. In conjunction with the register file (see section 
1.2.5) and program control (see section 1.2. 4), it directs the 
following operations! 

(a) External equipment Input/Output 

(b) Search and Move operations 

(c) Real time clock 

(d) Console typewriter Input/Output 

(e) High speed temporary storage in the register file. 

Block control is called in to initiate Search/Move 
operations. When the operation is initiated, it then hands control 
back to program control, allowing program erecuti on to continue while 
the Search/Move operations are being carried out. 

Note that only one operation at a time can take place under 
Block control. An attempt to initiate, say, a Move operation while a 
Search operation is in progress, will cause the Move operation request 
to be rejected, and Program control will skip to the reject address 
following the instruction.. 



10.2 SEARCH OPERATIONS 



10.2.1 Search for Character Equality 
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P + 1 



23 18 


17 


16 




00 


71 


INT 


2fi£ 


23 18 17 16 




00 


c 





mj_ 



INT = Interrupt designator 

"1" = Interrupt at completion of search 
"0" = Do not interrupt at completion of search 
= 008-773, BCD character to be looked for in memory 
= First character address to be checked 
= Last character address plus 1 to be checked 



C 

m l 
ni2 



Description: This instruction attempts to INITIATE a search through 

a block of characters in storage, looking for a charactei 
equal to character "C" (specified in the instruction.) 

SEARCH INITIATE POSSIBLE, i.e., the search/move section 

nf K1r,f>l- ^ r>n t- -»-<-> 1 -1 c nnh hncv. TVi o n n et- i-iir.f- 1 nn t-ransfprs 

*J±. I^J.V^IV ^^HW^^J. ^.^ *..„.. __^y. 

the lower 18 bits of the first word of the instruction 
to register file address 30 and transfers all of the 
second word of the instruction to register file address 
20. The hardware then sets flags in the upper 6 bits 
of register file address 30 », th-e search is started and 
the computer RNI's from P+3. (During the search, 
register file addresses 20 and 30 are not to be disturbed, 
also the upper six bits of register file address 30 
cannot be counted on to be any particular combination 
of bits). 

SEARCH INITIATE NOT POSSIBLE, i.e., the search/move 
section of block control is busy. The instruction in 
this case executes as if it were a NOP (no operation 
instruction) . It has no effect on the search/move 
section of block control, the register file or the 
interrupts if a search cannot be initiated. P+l will 
be bypassed and RNI will be from P+2. This latter 
location is usually filled by the programmer with 



UJP 



*_2 



to cause the computer to loop until the previous search/ 
move operation is complete and the search can be started. 

BUFFERED SEARCH. The search progresses while other 
instructions following the search initiate instruction 
are executed. The search is made, beginning at character 
address mj and continues character by character through 
memory until a character equal to "C" is found or until 
the address to be processed is equal to m 2 - The programmer 
can find out that the search is complete at the instant it 
terminates or when he is ready to check. The first is 
achieved with the interrupt designator, the second by 
using a sense instruction (both of which are to be 
covered later) . 



10.2.1 (cont.) 



Assuming that the programmer knows the search has completed, 
he can now determine if he found a character equal to 
character "C". If the lower 17 bits of register file 
address 20 and 30 are equal, no match was found. However, 
if they are unequal, the lower 17 bits of register file 
address 20 will contain the exact character address where 
the match with character "C" occurred. No ambiguity is 
possible, since register file address 30 (lower 17 bits) 
contains the last character address to be searched plus 
one; if the lower 17 bits of register file address 20 is 
equal to this address, the hardware has checked all 
addresses to be checked and is beyond the block of characters , 



Example: Given the block of data shown 
CDIMAGE 



00 


23 


46 44 




47 


21 


62 62 




73 


43 


73 67 




73 


51 


60 60 




r 


60 


60 


60 60 


} 



and the instruction 



(word address of this last 

word is CDIMAGE+19) 
(character address of the 

last character is CDIMAGE+79) 



SRCE 



73B , CDIMAGE , CDIMAGE+80 



what address will be in the lower 17 bits of register 
file address 20 at the termination of the search? 

Answer: The address equal to CDIMAGE+8. 

If CDIMAGE is equal to word 'address IOOO3 
(character address 4000g), then (register 
file 20, Lower 17) = 004010 Q 



Special Note: When checking for a no-find condition at termination 
of the search, the checking is easier if the block to 
be searched is less then 32768,,, characters. If this 
is the case, one of the following two methods can be 
used: 



(m 2 address fixed and lower two bits = OO2) 



TMA 20B 

SHA -2 

ASE endaddr 

UJP find 



(mo address variable or lower two bits fi OO2) 



TMA 30B 

SWA *+2 

TMA 20B 

ASE ** 

UJP find 



10.2,2 Search for Character Inequality 
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p + 1 



23 18 


17 


16 




00 


71 


INT 


m 2 


23 18 17 16 




00 


c 


1 

4+ 1 

i 


m l 





INT = Interrupt designator 

"1" = Interrupt at completion of search 
"0" = Do not interrupt at completion of search 
= 00o-77g, BCD character to be checked against 
= First character address to be checked 
= Last character address plus 1 to be checked 



C 

m l 
mo 



Description: This instruction attempts to INITIATE a search through 
a block of characters in storage, looking for the first 
character not equal to the eharater "C" (specified in 
the instruction.) 

SEARCH INITIATE POSSIBLE, i.e., the search/move section 
of block control is not busy. The instruction transfers 
the lower 18 bits of the first word of the instruction 
to register file address 30 and transfers all of the 
second word to the instruction to register file address 
20. The hardware then sets flags in the upper 6 bits 
of register file address 30, the search is started and 
the computer RNI's at P+3 . (during the search, 
register file addresses 20 and 30 are not to be disturbed, 
also the upper six bits of register file address 30 
cannot be counted on to be any particular 'combination of 
bits.) 

SEARCH INITIATE NOT POSSIBLE, i.e., the search/move 
section of block control is busy. The instruction in 
this case executes as if it were a NOP (no operation 
instruction). It has no effect on the search/move 
section of block control, the register file or the 
interrupts if a search cannot be initiated. P+l will 
be skipped and RNI will be from P+2. This latter 
location is usually filled by the programmer with 



UJP 



*-2 



to cause the computer to loop until the previous 
search/move operation is complete and the search can 
be started. 



BUFFERED SEARCH. The search progresses while other 
instructions following the search initiate instruction 
are executed. The search is made, beginning at character 
address mi and continues character by character through 
memory until the first character not equal to "C" is 
found or until the address to be processed is equal to m£. 
The programmer can find out that the search is complete 
at the instant it terminates or when he is ready to check. 
The first is achieved with the interrupt designator, the 
second by using a sense instruction (both of which are to 
be covered later.) 



10.2.2 (cont.) 



Assuming that the programmer knows the search has completed, 
he can now determine if there were any characters other 
then the character "C" and where the first of those occurred. 
If the lower 17 bits of register file address 20 and 30 are 
equal, no characters others then "C" exist in the block. 
However, if they are unequal, the lower 17 bits of register 
file address 20 will contain the exact character address 
where the first character other then "C" occurred. No 
ambiguity is possible, since register file address 30 
(lower 17 bits) contains the last character address to be 
searched plus one; if the lower 17 bits of register file 
address 20 is equal to this address, the hardware has 
checked all addresses to be checked and is beyond the 
block of characters. 



Example: Given the block of data shown 
CDIMAGE 



60 


60 


60 


60 


60 


60 


60 


60 


60 


62 


51 


23 


45 


60 


60 


60 


» 


60 


60 


60 


60 



and the instruction 



(word address of this last 

word is CDIMAGE+19) 
(character address of this 

last character is CDIMAGE+79) 



SRCN 



60B , CDIMAGE , CDIMAGE+80 



what address will be in the lower 17 bits of register 
file address 20 at the termination of the search? 

Answer: The address equal to CDIMAGE+9. 

If CDIMAGE is equal to word address lOOOOg 

(character address 400008), then the contents 

of register file address 20 lower 17 bits = 040011 8 



Special Note: See the Special Note for the SRCE instruction (Section 

10.2.1) for techniques in determining type of termination. 



10.3 MOVE INSTRUCTION 



18CS!!8H 



:8?£8tlittJ0(HREI$ MSMSS HEiO 
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INT = Interrupt designator 

"1" = Interrupt at the completion of the Move 

"0" = Do not interrupt at the completion of the Move 

y = Number of characters to be Moved 

If y = 001-177g, 001-127 10 characters are Moved 
If y = 000 , 128 10 characters are Moved 

mi = First character address of data source 

m 2 = First character address of data destination 

Description: This instruction attempts to INITIATE the copying of a 
block of "y" characters in one area in storage into a 
second area of storage. "y" is specified in the instruction. 

MOVE INITIATE POSSIBLE, i.e., the search/move section 
of block control is not busy. The instruction transfers 
the lower 18 bits of the first word of the instruction 
to register file address 31 and transfers all of the 
second word of the instruction to register file address 
21. The hardware then sets flags in the upper 6 bits 
of register file address 31, the move is started and 
the computer RNI • s at P+3. (During the move, register 
file addresses 21 and 31 are not to be disturbed, also 
the upper six bits of register file address 31 cannot 
be counted on to be any particular combination of bits.) 

MOVE INITIATE NOT POSSIBLE, i.e., the search/move 
section of block control is busy. The instruction in 
this case executes as if it were a NOP (no operation 
instruction). It has no effect on the search/move 
section of block control, the register file or the 
interrupts if a move cannot be initiated. P+l will be 
skipped and RNI will be from P+2. This latter location 
is usually filled by the programmer with 



UJP 



*-2 



to cause the computer to loop until the previous 
search/move operation is complete and the move can 
be started. 



BUFFERED MOVE. The move is made beginning at character 
address mj_ (source) and m 2 (destination) and continues 
through memory until "y" characters have been moved. If 
both m-L and m 2 are character addresses that represent 
character position and the number of characters to be 
moved is a multiple of four, the data is copied a word 
at a time. If all three conditions are not met, the 
copying proceeds a character at a time. The word move 
only takes one-fourth the time of a character move for 
the same number of characters, so should be used when 
possible. As soon as the "y" characters have been moved, 
the move operation terminates and the search/move section 
of block control reverts to the not busy status. 



10.3 (cont.) 



Example s Given the block of data shown, 
MOVE 6,410B,424B 
UJP *-2 



What is in storage at end 
of MOVE Operation? 

Answer* 



101 
102 
103 
104 
105 
106 

101 
102 
103 
104 
105 
106 



21 


14 


16 


32 


60 


60 


60 


60 


21 


31 


41 


21 


60 


60 


60 


60 


17 


01 


17 


01 


25 


25 


25 


25 




21 


14 


16 


32 


60 


60 


60 


60 


21 


31 


41 


21 


60 


60 


60 


60 


60 


60 


60 


60 


21 


31 


25 


25 



Special Note: If "y" is set by the programmer, he should remember 
that it is 7 bits. A SAGH (or SQCH) into the upper 
6 bits of "y" represents a character move of twice 
the number represented by (A lower 6)- or Slower 6> 
(or is twice+1 depending on the least significant 
bit of the original 1, y")» 

Techniques for changing "y": 

Word Move, "y" originally set to 0, number of words 
to be moved in A register (right justified), 

SHA 1 

SACH Moveinst+4 

Word Move, "y" current contents unknown, Number of 
words to be moved in A register (right justified). 



SHA 


2 


LDQ 


Moveinst+1 


SHQ 


7 


SHAQ 


17 


STA 


Moveinst+1 



Character Move, Number of characters to be moved 
in A register(right justified). 



LDQ 


Moveinst+1 


SHQ 


7 


SHAQ 


17 


STA 


Moveinst+1 



Als. if the source and destination blocks overlap, 
be sure that the source address is the higher address 
in memory or some of the source data will be destroyed. 



10.4 PAUSE INSTRUCTION (as used with SEARCH/MOVE Instructions) 
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4000 



Description: Once the main program has begun a Search/Move operation, 
It hands To ver control" of that part of the program to the 
Search/Move section of Block Control, The main program 
is then resumed at P + 3. If it is necessary to find the 
result of the Search/Move operation before the main pro- 
gram goes on with further calculations, etc, the PAUS 
instruction is used. 

This instruction senses the status of the Search/Move 
section of Block Control. If it is busy, the machine 
main control pauses for 40 msec, or until the Search/Move 
section becomes not busy. If it stays busy for 40 msec, 
the computer RNI's at P + 1. If it was originally not 
busy or becomes not busy during the 40 msec, interval, the 
computer RNI's at P + 2. 



At the completion of a Search/Move operation, Register File 
Location 20 contains the final current word address for a 

t CgiBLCi. 11J.C UUUOLiUll i. J. \_<->m_ a. X UO J. 1_ 

for a Move. The contents of that word is generally not 
useful to the programmer in the case of a Move, but is 
quite important in the case of a Search. Here is how the 
word at Register File Location 20 is divided; 



23 



18 17 16 



00 



Current address at termination of 
Search operation. If it is equal 
to the last character address plus 
one, it means that the condition 
for which the search was performed 
was not found. Otherwise it is 
equal to the character address of 
the 'find' . 



{ 



if SRCE instruction 

1 if SRCN instruction 



f Character used for equal or 
\ not equal test during search, 



Examples: i) The instructions to be 
performed are: 

SRCN 21B,400B,414B 

UJP *-2 

PAUS 4000B 

UJP *-l 

TMA 20B 

HLT 



The block of characters to be 
searched is: 



100 


21 


21 


21 


21 


101 


21 


21 


21 


21 


102 


21 


21 


20 


21 



What will be the contents of the A register when the 
computer halts on the HLT instruction? 

23 18 17 16 00 

Answer: (A) = 21400412 



21 


1 


000414 



10.4 (cont.l) 



ii) Given the block of data shown, where the word address 
of RHT = 17714„, what will be the contents of A after 



execution of 



8 



SRCE 


21B,RHT,RHT+33 


UJP 


*_2 


PAUS 


4000B 


UJP 


*-l 


TMA 


20B 



RHT 



00 


00 


00 


25 


00 


00 


00 


31 


00 


00 


00 


46 


00 


00 


00 


27 


03 


21 


60 


60 


00 


00 


00 


41 


00 


00 


00 


31 


77 


77 


77 


77 



Answer: (A) = 21077501 



iii) If the word address of ST0RE is 17717 ft , and. the character 
address of CEASE is 77514g, given the block of data shown, 
what will be the contents of A after execution of: 



SRCN 


6OB,ST0RE, CEASE 


UJP 


*_2 


PAUS 


4000B 


UJP 


*-l 


TMA 


20B 



ST0RE 



60 


60 


60 


60 


60 


60 


60 


60 


60 


60 


21 


60 


60 


60 


60 


60 



Answer: (A) = 60477506 



ST0RE = word addr 17717g = 001 111 111 



uui J. J. J., 



= char position 0^ 
= char address 

regrouped 



00- 



001 111 111 001 111 oo 2 

00 111 111 100 111 100 2 = 77474 p 



iv) If the word address of INBUFF is 17000g and the word address 
of 0UTBUFF is 17400 g and the number of characters to be moved 
is 8, what will be the contents of the A register after the 
move is complete? 



M0VE 


8, INBUFF ,0UTBUFF 


UJP 


*-2 


PAUS 


4000B 


UJP 


*-l 


TMA 


21B 


Answer: (A 


) = 00074010 



At the start of the Move, the contents of 
Register file location 21 was: 



04074000 



10.4 (cont.2) 



Exercises : i) INBUFF currently contains a card image. Somewhere in the 
card image is a comma. Write the code that will search 
for the comma and then copy all the information up to the 
comma into an output area called 0UTBUFF. 0UTBUFF is large 
enough to contain all of INBUFF. 

ii) ZUP currently contains a twelve digit BCD number with leading 
zeros. Using the Search Instruction, find the most significant 
digit and replace all leading zeros with 60B codes. 

iii) Using the Search instruction, check the character in the A 
register against a table of characters, seven characters 
long. The table is as follows: 



FTN0P 



13 20 34 40 



54 61 74 00 



If the character is equal to any of these characters, 
transfer control to location WAS0P, otherwise continue 
to the next section of code. 



STUDENT NOTES 



STORAGE TESTS 



11.1 MASKED EQUALITY SEARCH 



11.2 MASKED THRESHOLD SEARCH 



11.3 STORAGE SHIFT 



11.4 COMPARE (WITHIN LIMITS TEST) 



Chnntpr 




11.1 MASKED EQUALITY SEARCH 
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i = thru 7 = interval designator 
m = storage address (of first word) 

Description * (A-) is compared with the logical product of (Q) and (M) 
where M - m+(B 1 ) 

HOTE : This instruction uses B exclusively . 
^ 



Examples : 



Put the 

instruction 

in F Register 



Decrement 
B l by i 



Did sign of \ Yes 
Bt change from } 

. + tp -? / 

| No 



RNI from 
P + 1 



Modify: M = m + (B 1 ) 



No 



r 



/ (A) = (Q)»(M) L 



Yes 



RNI from 
P + 2 



N.B. i - 1 means interval 1 

i - 7 " " 7 
i - " " 8 

(i) Given the following conditions: 



(B 1 ) = 5 

(Q) = 77777777 8 

(A) = 60606060 8 



100 


00674320 


101 


21314367 


102 


60606060 


103 


67676767 


104 


47532167 



and the following program section: 



ENI 


5,1 


ENQ,S 


-0 


MEQ 


100B,1 


UJP 


N0FIND 


INI 


100B.1 


STI 


FIND.l 



do the following: 



11.1 (cont.) 

Answer: 



(a) Decrement B by 1 and calculate M. 

M - m + (B 1 ) 

-100+4 

- 104 

(b) Compare (A) with logical product of (Q) and (104) 

(Q) - 77777777 

(104)= 47532167 

47532167 

which is not equal to A. 

(c) Decrement B by 1 and' repeat 

(Q) - 77777777 
(103)- 67676767 
67676767 
which is not equal to A. 

. » _ . -1 . . , ^ 

(d) Decrement JJ oy 1 ana repeat 

(0 - 77777777 
(102)- 60606060 
6O6O6O6O 
which is equal to A. 
RNI P + 2. 

(e) Contents of FBfD = 102. 



11.2 MASKED THRESHOLD SEARCH 



efflw : ifiPHMioMjoiiiHHs mbkss mu 

77 , ". nth "~ .' w 77 ~~ " 



23 18 17 15 14 



00 



07 


i 


m 



i = thru 7 = interval designator 
m = storage address (of first word) 



Description ; This instruction is similar to the MEQ; the only 
differences being that RNI from P+2 occurs when 
(A) £ (Q) x (M) , and that index B 2 is used 
exclusively . 



Example; 



Instruction 
put in F 
Register 



Decrement 
Index B^ by l 



G 



2 Did sign of \ yes 

B change from J 

+ to -? / 



>j RNI from 
P + 1 



No 



Modify: M = m + (B 2 ) 



I 



No 



(A) > (Q)# (M\ ) Yes 



RNI from 
P + 2 



Given the following conditions and program secti< 
(B 2 ) = 6 



100 



?7777777« 


101 






102 


)000004C 


'8 


103 
104 
105 
106 


MTH 




100B,2 


UJP 




N0FIND 


INI 




100B,2 


STI 




FIND, 2 



00000067 



00000104 



00000040 



00000111 



00000700 



00000077 



00000052 



a) What will be the contents of FIND after this 
program section is executed? 

b) What locations will have been checked? 



Answers: a) (FIND) = 00000102 



8 



b) Locations checked = 104B 
and 102B 



11.3 STORAGE SHIFT 
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Description ; Sense bit 23 of (m). 

Shift (m) one place left, end around, and replace 
it in storage. If bit 23 of (m) was a 1-bit, RNI 
from P+2 , if BNI from P+1 . 



RNI P + 1 « 



Instruction 
put in F 
Register 



Check Sign 
of (m) 



Shift (m) 

one place left, 

end around 



JteS. 



(Was sign\ 
of (m) +lh 



_Ha_ 



RNI P + 2 



(100) = 52525252 



Examples ; 

(i) SSH 100B 

UJP ST0P 

UJP *-2 

ST0P HLT 

First time through (100) - 101 010 101 010 101 010 101 010 
which is negative, so RNI at P+2. 

Second time through (100) = 010 101 010 101 010 101 010 101 
which is positive, so RNI at P + 1 and jump to Halt. 



11.4 COMPARE (WITHIN LIMITS TEST) 



! WRHIM 


lOPERATietl.MBSlFIERS MMfSS Hfl0 






CPR,I m,h 




:, < .:,.«:- 


„ . . 


_<i.!.5.ii*L2.:«liU 



23 18 17 16 15 14 



00 



52 


a 


b 


m 



a = addressing mode designator 
b = index designator 
m = storage address 

Description; The Compare, within limits test, instruction, is a two 
phase instruction. The first phase compares the 
contents of the M address against the contents of the 
A register. If the contents of memory is larger, the 
computer RNI ' s at P + 1. If the contents of memory is 
less than or equal to the contents of the A register, 
the instruction proceeds to the second phase of the 
test. This phase compares the contents of the Q register 
against the contents of the M address. If the contents 
of Q is larger, the computer RNI's at P + 2. If the 
contents is less than or equal to control passes to 
P + 3. 

Summarized: If (M) > (A) , RNI at P + 1 
otherwise, next test 

If (Q) > (M), RNI at P + 2 
otherwise, RNI at P + 3 

Expanded these relations become: 

(Q) > (M) > (A) 

(Q) = (M) > (A) 
(M) > (Q) > (A) 
(M) > (A) s (Q) 
(M) > (A) > (Q) 

(A) > (Q) > (M) 

(A) = (Q) > (M) 

(Q) > (A) > (M) 

(Q) > (M) = (A) J 

(A) = (M) = (Q) 

(A) = (M) > (Q) 

(A) > (M) = (Q) 

(A) > (M) > (Q) 



RNI at P + 1 



RNI at P + 2 



RNI at P + 3 



All possible relationships between A, Q and M 
are shown. 

Normally, the value in the A register is greater than 
or equal to the value in the Q register. If this is the 
case, the following indicates the action of the instruction. 



(M) > (A) RNI at P + 1 

(A) > (M) > (Q) RNI at P + 3 

(Q) > (M) - RNI at P + 2 



11.4 (cont.l) 



While the instruction is almost always used in situations 
where the contents of A is greater than or equal to the 
contents of Q, occasionally it is not. Following is a 
discussion of the instruction in these alternate uses. 

Stated in shorthand form, where the contents of the A 
register is less than the contents of the Q register, 
the instruction behaves as follows: 

(M) > (A) RNI at P + 1 
otherwise, RNI at P + 2 

Note: RNI at P + 3 is not possible because if 
(M) ^ (A) then (M) < (Q) as (A) < (Q). 

Reversing positions of A and M, the branching 
conditions become: 

(A) < (M) RNI at P + 1 
(A) ^ (M) RNI at P + 2 

This then is nothing more then an ASG with a full 24 bit 
operand. However, one value that A can take on is 
troublesome and that is 37777777. When this is the 
contents of A, (A) < (Q) is not possible as 37777777 is 
the largest possible positive number. 

While this form of the instruction looks useful, it 
rarel v is used as it can usually be replaced by a load Q 
and an AQ test. The coding that way ends up shorter and 
executes faster. 

Another possible use of the instruction exists where the 
contents of the A register is set to 37777777g or the 
contents of the Q register is set to 40000000g. 

In the case where (Q) is set to 40000000g, the instruction 
acts as follows: 

(M) > (A) RNI at P + 1 
otherwise, RNI at P + 3 

This looks very much like the previous form 
except for the RNI's. It is essentially an 
A skip greater than or equal to where the 
skip is two words rather than one. Since P + 2 
is unused, M can be set equal to it with (M) 
equal to the test value. 

e.g. 



LDQ 


=040000000 


GPR 


*+2 


UJP 


less-than-routine 


0CT 


test-value 



great er-than-or-equal-condit ion-next -instr, 

In the case where (A) is set to 37777777g, the instruction 
acts as follows: 

(Q) > (M) RNI at P + 2 
otherwise, RNI at P + 3 

This is essentially a Q test. Also since P + 1 
is unused, M can be set equal to it with (M) 
equal to the test value. 

e.g. LDA =037777777 
GPR *+l 
0CT test-value 
UJP greater- than- routine 
less-than-or-equal-condition-next-instr. 



11.4 (cont.2) 



Note in both of the two previous forms that A or Q must 
be set prior to the execution of the instruction and both 
A and Q are in use. Here as with the condition earlier, 
a load A or a load Q coupled with an AQ test usually 
produces shorter code which executes faster. 

Still another possible. use of the instruction exists 
where the contents of the A register is set equal to the 
contents of M or the contents of the Q register is set 
equal to the contents of M. 

Where (Q) = (M), the instruction executes as indicated: 

(M) > (A) RNI at P + 1 
otherwise, RNI at P + 3 

This is similar to the case where the contents 
of Q is set to 40000000g. As in that case, 
P + 2 is unused. Therefore, M can be set 
equal to P + 2 with (M) set equal to (Q) 
during execution* 

e.g. 



STQ 
CPR 


*+3 

*+2 


UJP 
BSS 


less-than-routine 
1 



great er-than-or-equal-to-next-instr. 
Where (A) = (M), the instruction executes as follows: 

(Q) > (M) RNI at P + 2 

otherwise, RNI at P + 3 

This is similar to the case where the contents 
of A is set to 37777777o. As in that case, 
P + 1 is unused. Therefore, M can be set 
equal to P + 1 with (M) set equal to (A) 
during execution. 

e.g. 



STA 


*+2 


CPR 


*+l 


BSS 


1 


UJP 


greater-than-rout ine 



less-than-or-equal-to-next-instr. 

Note: In the case where (Q) is set equal to (M), 
the same thing could have been achieved by: 

AQJ,GE *+2 

Likewise, in the case where (A) is set equal 
to (M), the following instruction serves the 
same purpose: 

AQJ,GE *+2 

Since *+l will almost .certainly be a UJP, 
these can be replaced by a: 

AQJ,LT address- in-UJP- instruct ion 

Obviously, the forms of the instruction where (Q) = (M) 
or (A) = (M) are not useful. 



11.4 (cont.3) 



About the only useful form of the instruction other then 
the one where it is known that (A) ^ (Q), is where the 
(Q) is totally unknown and of no concern. When this is 
the case, the instruction is applied as follows: 

(M) > (A) RNI at P + 1 

otherwise, RNI at P + 2 or P + 3 

When used in this manner, it is nothing more then an 
ASG where the test value is a 24 bit operand and (P+2) 
must be a NOP. 

No matter how the CPR instruction is applied, the following 
is always true: 

00000000 + 11111111 
and, 00000000 > 77777777 

Example : Assuming the following initial conditions, what does this 
program do? 



BEGIN 



Answer : 



(A) 


= 100B 




(Q) 


= SOB 




(100) 


= 00000064 


(101) 


= 00000104 


(102) 


= 70000000 






CPR 


100B 




UJP 


*+2 




UJP 


*-2 




CPR 


101B 




CPR 


102B 




UJP 


*+2 




CPR 


103B 




HLT 







UJP 


*-5 




RNI sequence 


= BEGIN 






BEGIN+3 






BEGIN+4 






BEGIN+6 






BEGIN+7 



(Halt) 

Exercise: Table IQ contains 100 IQ values. Count all the IQ's. 
in the following ranges 0-79, 80-119, 120-up. Use the 
CPR instruction, then do it without the CPR instruction. 
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12,1 INTRODUCTION 



12.1.1 Storage of floating point numbers 

Any number can be expressed in the form kB 11 



when k 
B 
n 



coefficient 

base 

exponent 



Floating point is always packed into 2 words in the 3200, 
making a 48-bit representation of the number. 



The lower 36 bits 
next 11 bits 
Upper bit 



the coefficient 

exponent and sign of exponent 

sign of the coefficient 



Coefficient M" 



Sign bit 



xponent 



47 46 



36 35 



»P + 1 



Coefficient 



00 



12.1.2 Normalizing the coefficient 

The coefficient is a 36-bit fraction, which is adjusted before 
packing, so that the fraction lies between £ and 1 . 

i.e. 1 > FRACTION £ £ 

The coefficient is always adjusted so that a binary 1 follows 
the radix point, and nothing is in front of the radix point. The adjustment 
is made by shifting the radix point and multiplying the answer by the 
required power of 2. 



e.g. 4 8 = 100.0 in binary 

= .100 x 2 3 in binary 

= .4x2- in octal 
101 8 = 1 000 001. in binary 

= .100 000 100 x 2 7 in binary 

= .404 x 2 7 in octal 
.06 8 = .000 110 in binary 

= .110 x 2" 3 in binary 

= .6 x 2" 3 in octal 
.00001 8 = .000 000 000 000 001 in binary 

= .100 x 2" 16 in binary 



.4 x 2" 16 in octal 



}~ 



exponent = 



-16 8 = -14 10 



12.1.3 The Exponent 



lies in the range 0000 - 3777q. However 1777 g is not possible 
as it implies an exponent of -0 which will never result when 
performing a floating point operation. If one of the operands 
has 1777 for an exponent, it will be used as though it were 2000. 



12.1.3 (cont.) 



It is always biased before packing to enable comparison with 
other Floating point numbers. 

This biasing ensures that the exponent is always positive. 
RULE : If positive, 2000g is added to it. 
If negative, 1777 is added to it. 

o 

Thus if the biased value lies in the range OOOOg - 1776 g , it is 
a negative exponent. 1777 g does not normally occur as it = -0. 

But if the biased value lies in the range 2000 Q - 3777g, it is 
a positive exponent. 



e.g. k x 2 4 Exponent is positive, therefore 2000 added. 

- 2004 
and k x 2 4 ° 7 = 2407 



e.g. k x 2~ 4 Exponent is negative, therefore 1777 Q added 



1777 8 + (-4) 
1773 8 



and k x 2" 407 - 1370 fl 



12.1.4 Conversion Procedures 

( 1 ) Convert the number to binary 

(2) Normalize the number 

(3) Bias the exponentt 

(4) Assemble the number 

(5) If negative, complement the result 

Example : 4.O 

(1) Binary - 100. 

(2) Normalize - .100 x 2 3 

- .4 8 x 2 3 

(3) Exponent - 3 + 2000 

- 2003 



(4) Assemble » [ 2003] 4000; 0000 0000 



Leftmost octal number » 2 = 010 
in binary 

Sign bit - - POSITIVE NUMBER 



e.g. Pack 563 



8 



(1) Binary = 101 110 011 

(2) Normalize = .101 110 011 x 2 11 - .563 x 2 - 

(3) Exponent = 11 + 2000 = 2011 



12.1.4 (cont.) 

(4) Assemble 
e.g. Pack -563 Q 



2011 



5630 | 0000 0000 



Steps (1) to (4) as above 

Then, because it is negative, complement the result. 



5766 



2147| 7777 7777 

T 



Note ; Bit 47 (top bit) = 1, because 5 « 101 in binary. 



e.g. Pack -1463, 



8 



(1) Binary = 001 100 110 011. 

(2) Normalize - .110 011 001 100 x 2 

- .6314.x 2 12 

(3) Exponent = 12 + 2000 = 2012 

(4) Assemble 



12.*- 



octal. exponent 



2012 



6314 '< 0000 0000 



Complement because number is negative 



5765 1463 | 7777 7777 

i ' • — ■ — - 



e.g. Pack -.35 



8 



(1) Binary * .011101 

(2) Formalise * .111010 X 2~ 1 



(3) Exponent 

(4) Assemble 



«72 at 2~ 1 

1777 + (-1) * 1776 
1 



1776 



7200 : 0000 0000 



Number is negative, so complement the number 



6001 1 0577 : 7777 7777 



12.1.5 Unpacking Floating Point Numbers 

Rules : 

(1) If upper bit ,is a one, number is negative. Complement, 
and note that sign of the final answer must be negative. 

(2) If exponent is less than 1777 fl » exponent is negative. 
Subtract 1777 from exponent. 

(3) If exponent is greater than 2000 fl , exponent is positive. 
Subtract 2000 from it. 

e.g. UNPACK 



2000 



4000 1 0000 0000 

i 



(1) Number is positive (the upper bit » 0) 

(2) Exponent is positive (^2000) 

- 2000 - 2000 - 

(3) Number - .4x2° 



.4 



12.1.5 (cont.) 



e.g. UNPACK 



6002 



0777 ! 7777 7777 



(l) Upper bit is 1 - mamber is therefore negative, 
so first complement it 



1775 



7000 i 0000 0000 

1 



(2) Exponent is < 1777» and is negative 

- 1775 - 1777 
= -2 

Shift coefficient to right 2 places 

(3) Coefficient = .7 

= .111 

Shift = .001 110 

- .16 

Answer = -0.1 6 Q or -0.21875 
o 



10 



12.2 EXECUTION OF FLOATING POINT OPERATIONS 



12.2.1 Addition 



(1) Equalize exponents by shifting coefficient of the algebraically 
smaller number to the right. 

(2) Add coefficients, and normalize 
e.g 

10, 



10 8 + 


ioo 8 ( 


ioo 8 = 




1 


2004 


4000 i 00000000 
1 


2007 


4000 ! 00000000 



8 



Shift coefficient of 10 



8 



.1ox 2 = 0OOOI0X 2 1 



= .04 gX r 



2007 



0400 ' 00000000 



Add coefficients and normalize 

.4000 0000 0000 x 2 7 

.0400 0000 0000 x 2 7 

- .4400 0000 0000 x 2 7 

this is normalized already 

Number = .100100000000 000000000000 000000000000 2 x 2 7 
= 1001000. 
- 001 001 OOO2 



1 1 



0, 



8 



12.2.2 Subtract ion 



(1) Equalize exponents 

(2) Subtract coefficients and normalize 
e.g. 43 6 - 6 8 

,6 



43, 



8 



.100011 x 2 
.110 x 2 3 



2006430000000000 
2003600000000000 



Equalize exponents, ie, 2003 6000 0000 0000 (.110 2 x 2 3 ) 

becomes 
2006 0600 0000 0000 (.000110 2 x 2 6 ) 

Subtract coefficients and normalize 

.4300 0000 0000 x 2 6 
(-).0600 0000 0000 x 2 6 

.3500 0000 0000 x 2 6 

.7200 0000 0000 x 2 5 after being normalized 

Number = .111010000000 000000000000 000000000000 2 x 2 5 
= 11101. 
= 011 101o 



= 3 



8 



12.2.3 Rounding of Floating Point Numbers 

In floating point operations, the E register is joined to the AQ 
register, to form a 96-BIT REGISTER AQE (the uppermost bit is the sign). 



IQ 



Iftt. 



I*L 



Exponent 



Coefficient 



24 bits 



24 bits 



■1 11 bits 12 bits! 24 bits I 

To carry out rounding, the sign of AQ is compared with the sign of E. 
If sign of AQ is not equal to sign of E, number in AQ is rounded. 

Example ; 

(i) If AQ _ = 0, number is positive. 

If E.„ =1, number in E must begin with either a 
47 

4, 5, 6 or 7 

i.e. E can begin 1 00 = 4 

101 « 5 

110 = 6 

or 111 = 7 

The number in AQ is therefore rounded up by adding one to AQ, 

(ii) If AQ = 1 , number is negative. 

If E^ =0, number in E must begin with either a 
0, 1, 2 or 3 

which is -7, -6, -5> and -4. 

The number in AQ is therefore rounded down by subtracting one from AQ. 



e.g. 



e.g. 



AQ 


E 




512 7 


247"" ~ ~~ 6 



BIT., = 
47 



BIT.. = 1 
47 



Positive number is rounded. 



AQ 


E 




277- -7 


247 ~* 6 



No rounding is necessary. 



e.g. 



AQ 


E 


777 "7 


166 7 



BIT.- = 1 
47 



BIT 



47 



Rounded down because negative number. 

Summary: If the sign of AQ is different from the uppermost bit of E, 
one is added to AQ if AQ is positive or one is subtracted 
from AQ if AQ is negative. 

12.2.4 Multiplication 

(i) Unbias the exponents by subtracting 2000 Q or 1 777g» as the case 
may be. 

(ii) Add the unbiased exponents. 

(iii) Multiply the coefficients. 



12.2.4 (cont.) 



(iv) Normalize the coefficient resulting and adjust the exponent, 
(v) Assemble the number. 

e.g. Multiply 100 Q by 10 Q 

100 Q - 001000000 

8 7 

= .100000 x 2' (Binary) 

- .4 x 2 7 (Octal) 
i 



2007 4000 • 00000000 



10_ = 001000 
o 



.100 x 2 4 (Binary) 
.4 x 2 4 (Octal) 



2004 4000 i 00000000 
, i 



(i) Unbias exponents 

2007 becomes 7 
2004 becomes 4 

(ii) Add unbiased exponents 

7 
+4 



13 8 



(iii) Multiply coefficients 

100g becomes .4 g when normalized 

10„ becomes .4„ when normalized 
° o 

product = .20g 
(iv) Normalize resulting coefficient 





.20 x 


2 13 


- .010 x 2 13 (Binary) 


12 
- .100 x 2 


- .4 x 2 12 (Octal) 


(v) Assemble answer 
i 


- 


2012 


4000 i 00 00 00 00 

1 


(vi) Check 


i 
ing 


10 


°8 X1 


°8 - 1000 8 



- 001 000 ooo ooo 2 

■ .100 x 2 12 (Binary - exponent in octal) 

12 
= •* x 2 (Octal - exponent in octal) 



12.2.5 Division 

(i) Unbias the exponents 

(ii) Subtract the unbiased exponents 

(iii) Divide the coefficients 

(iv) Normalize the coefficient resulting and adjust the exponent 

(v) Assemble the numbers 

e.g. Divide 100. by 10 o 

O O 



ioo 8 


- 001 000 


000 








= .1 x 2 7 

» .4 x 2 7 
- 001 000 


(Binary) 


i 




(Octal) = 


2007 4000 ; 00000000 


10 8 








« .1 x 2 4 

= .4 x 2 4 
Unbias the 


(Binary) 


1 




(Octal) - 


2004 4000 j 00000000 


(i) 


exponents 






2007 


becomes 7 




2004 


becomes 4 


(ii) 


Subtract unbiased exponents 






7 







(iii) Divide coefficients 



100 ft becomes .4 g when normalized 



10 



8 



becomes .4 when normalized 
o 



quotient =1.0 



8 



1.0 
ie, .4 ) .4 



(iv) Normalize resulting coefficient 
1.0 x 2 3 
= .1 x 2 4 (Binary) 
= .4 x 2 4 (Octal) 
(v) Assemble answer 



2004 



4000 » 0000 0000 

« 



(vi) Checking 



100 8 * 10 8 = 10 8 
10 8 =001 000 (Binary) 
= .100 x 2 4 



= .4x2' 



(Octal) 



12.3 FLOATING POINT INSTRUCTIONS 



12.3.1 Floating Point ADD 



1 lOCJITTOfl 


OKMfiSHjaDIFIHS UIHSS F1EU 


| :• i > :.. 1 ! .! j 


WJL^ ^SiA.,^.., .,.,,.,,., 




\ 


le»*.j»j»»it 


V •»>»(»?■ 



23 18 17 16 15 14 



00 



60 


a 


b 


m 



a = addressing mode designator 
b = index designator 
m = storage address 

Description ; Add the contents of two consecutive locations 

(M and M + 1) to the contents of AQ, where M = m + (B ) 
The normalized and rounded sum appears in AQ. 



Example ; 



FAD FPSUM 





■A 


.0 


AQ = 


2 7 


4000| 000000 




FPSUM 


.FPSUM+1 




2 4 


400 Oi 00000000 


Final result of AQ 
A 


|Q 




2 00 7 


4 4 0J 00000000 



Exercise ; If contents of Registers and a part of memory are: 

(A) = 20014500 
(Q) = 00000000 



FPSUM 


6060 6060 


FPSUM+1 


2007 


3621 


FPSUMf2 


00000000 


FPSUMfS 


2004J 4000 


FPSUM+4 


0000 0000 



Index register 3 contains 3» and 

Index register 1 contains 1 , 

What would be AQ after execution of 

(a) FAD FPSUMI } 3 

(b) FAD FPSUM, 1 



12.3.2 Floating Point SUBTRACT 



1 LfiCiTIM 


9f>EM1!0N.MlS!FIEK ASB8ESS FIELB 


1 - ■ _i ■ 


FS8,L , , ^ m^h _ , . . , , . , 


!■:•■>:. ,-t ■ • • 


1 

».-'■•:■' • ".«; •:'T'l":'':'-l"l"i".!«i''K'.i.<? 


, 





23 18 17 16 15 14 



00 



61 


a 


b 


m 



a -■ addressing mode designator 
b * index designator 
m - storage address 



12.3.2 (cont.) 



Description ; Subtract the contents of two consecutive 
locations (M and M + 1) from the contents 
of AQ,where M - m + (B°) 



Example : 





A 


• Q 


If (AQ) - 


2 6 


430 o! 0. 0000 


! 

FSB FP0P 

FP0P , FP0P+1 




2 3 


& 0- & 6 


Pinal result of AQ : 

A ,Q 




2 5 


i ■ ' ■ ■ 

7 2 Oj 00000000 



35 



10 



= 29 



10 



12.3.3 Floating Point MULTIPLY 



tKSTiflU J j$F£giH$gN,li§BSF!EK *I8KSS HEU 



fMU,I m t b 



23 18 17 16 15 14 



00 



62 


a 


b 


m 



a = addressing mode designator 
"b » index register 
m » storage address 

Description : Multiply the contents of AQ "by the. contents 
of 2 consecutive locations , M and M + 1 , 

where M = m + (B ) . 

The product appears in AQ normalized and rounded. 



Example : 
FMU 



If (AQ) = 



and (EPjBP) = 



A 


! Q 


2 7 


4000J. 0' 00000 


1 
EP0P JEP0P+1 


2 4 


4000100000000 

; __| 



and the instruction «= FMU EP0P 



the final 
(AQ) = 



'Q 



2 12 


1 1 1 

4000 |0 0000000 

1 1 1 



12.3.4 Floating Point DIVIDE 



18MTIB* 


: WEMJIMJ0DIHF8S «0«fSS FMI 




FDV,I , tn,b 


i ■ <. . •■ % - 


'. ... j t; ,. v .■:, ll< 'i<;>.r.|t>^»|ii i (.|fi» : »-)e i vi« 


,,,„,„.„.. 



23 18 17 16 15 14 



00 



63 


a 


b 


m 



a = addressing mode designator 
b = index designator 
m = storage address 



Description ; Divide the contents of AQ by the contents of 
2 consecutive location , M and M + 1 , where 

■u 

M = m + (B ). The result appears in AQ, 
normalized and rounded. 

Example t If (AQ) are as shown below, FP0P 

contains 20044000, and FP0P+1 contains 0, 
what would be the contents of AQ after 
execution of the instruction. 



FDV 
Solution: 



FP0P 

A 



IQ 



Final result of AQ 



2 7 


■ 1— ■ . 

400 0' oooooooo 


FP0P 


1 ' 

,FP0P+1 


2 4. 


4 0. 0] oooooooo 


A 


! ' 

iQ 


2 4 


4 0i 

I 



48-BIT REGISTER OPERATIONS 

13.1 48-BIT E REGISTER 

13.1.1 Introduction 

13.1.2 Trapped Instructions for the E Register 



13.2 TRANSFERS BETWEEN A AND Ey 
13.2.1 Transfer Err to A 



13.2.2 Transfer A to E 



U 



13.3 TRANSFERS BETWEEN Q AND E L 

13.3.1 Transfer E L to Q 

13.3.2 Transfer Q to E 

13*4 TRANSFERS BETWEEN AQ AND E 

13.4.1 Transfer E to AQ 

13.4.2 Transfer AQ to E 

13.5 SCALE AQ 



Chapter \^\ 



13.6 USE OF THE SCALE AQ INSTRUCTION 



13.1 48-BIT E REGISTER 
1 3« 1 . 1 Introduction 

The E register is a 48-bit, octal register* used as a 
supplement to AQ in floating point and 48-bit precision operations, 
It extends the size of AQ to 96 bits by forming AQE. 

All 3200 computers do not contain the hardware for 
the E register, which therefore cannot be displayed on the console 
of these machines. (Where the full hardware is available, the 
contents of the E register can be displayed on the console in the 
displays usually containing A and Q.) 



■* The E register is the lower 48 bits of the 52 bit + sign E D register, 
The upper 4 bits of E D and the sign of E D are not affected by 
Floating point, 48-bit multiply or divide, or inter-register 
operations . 

13.1.2 Trapped Instructions for the E Register 

Floating point and 48-bit precision operations are handled 
on the 3204 basic processor by a special software package. The 
instructions are detected by the hardware, and "trapped". They are 
then processed by the special software programs 0PTB0XS and FDPBOXS. 
0PTB0XS examines each trapped instruction to see if it is a Floating 
point/48-bit instruction or a BCD instruction (see Section 14.3). 
If it is a BCD instruction, the program BCDBOXS is used to process 
it. If it is a Floating point or a 48-bit precision instruction, the 
program FDPBOXS is used. 

FDPBOXS simulates the hardware for the E register so that 
the instructions can be executed without the hardware being present. 



13,2 TRANSFERS BETWEEN A AND Ey 
13*2.1 Transfer Eu to A 



tecMiss 


; jOFEgftliSg.MiMFIHS 


hdkss rati 






mm 


, E > , j , « . , : t ; . ■, 




,.!ii-j«iit>]>.,s > ,!«,t;i<«.>« 


„;„;„,„„ 


<i»,ui>:, 



23 18 17 15 14 




Description; This instruction transfers the contents of E upper (bits 47-24) 
to the A register. The E register is not disturbed by the 



transfer. 



Example: Suppose 0P48 contains 0, and 0P48+1 contains 2. 
If A contains 0, and Q contains 76OOOOOO, what 
will he in A as a result of: 



0P48 



EUA 



Answer : 



Multiplied by- 



results in 



n 





i 


00000000 


| 76000000 


0P48 


#P48+1 


00000000 


1 00000002 

i 



00000000 I 00000000 



2L 



El 



00000001 i 74000000 



Transferring Ey to A, (A) = 00000001 



13.2.2 Transfer A to Ey 



I LeCATiOR 


" ; ,r IN x "■ ■.«- 


ADDRESS FICtB 




1 . . . , , ■ 


mi 


:/:■:,,:.,, 




: • ■■! : i ■ * : * ■ t > 3 


* U U-< = ■.■.■i::} i ,*::*\,9^T:--***'- 


*<HZ--!g<ittit* f *>,t*,T}it*:SW'-* 


MJiV^-WiS*.**: 



23 18 17 15 14 



00 



55 


6 





Description: This instruction transfers the contents of the A register 

to E (bits 47-24). E register bit positions 51 thru 48 

upper 
and 23 thru 00 are not disturbed by the transfer. Also the 

A register remains unchanged as does the sign of E. 



Example: What will be in E„ after execution of the following 
instructions: 



ENA 
AEU 



20321B 



Answer: 



Ey- = 00020321 



13.3 TRANSFERS BETWEEN Q AND E T 



13.3.1 Transfer E^ to Q 



[ lW»?i8N 


ePEBAIIOH.MOOiriFRS 


MMfSS FlEiO 


1 ■ ■■ : ■ 1 : 
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Description : The lower 24 bits of E, ie, E lower , are transferred to 
the Q register. The E register remains unchanged at 
the end of the transfer. 



Example : 



In the EUA example, if the instructions had been; 



MUAQ 

EUA 

ELQ 



0P48 



What would be in Q after execution? 
Answer: (Q) = 74000000 



13.3.2 Transfer Q to E, 



K»?I«N 


: DPEM1liN.I(BDIFIfK tillfSS FrElB 




QBL 




: * ■. • t ■■-, .«,' - . .--,.., 
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Description: The contents of the Q register is transferred to E, 

(bits 23-00). Bit positions 51 thru 24 and the signer" 
E are not disturbed by the transfer. Likewise the Q 
register remains unchanged. 



Example: 



In the following example: 



ENQ 
QEL 



20321B 



What will be in E L after execution of the instructions? 
Answer: (E L ) = 00020321 



13.4 TRANSFERS BETWEEN AQ AND E 
13.4.1 Transfer E to AQ 



liCiflOK 


!0PE8*1!8»J§BIH«S 


KIUESS flEli 






WW 
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: 1 1 
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Description : Transfer the 48 bit contents of E (bits 47-00) to AQ. 
EyCbits 47-24) is transferred to A and E L (bits 23-00) 
is transferred to Q. The contents and sign of E is 
not disturbed by the transfer. 



Example : 



In the EUA example, if the instructions had been: 

MUAQ 0P48 
EAQ 



What would be in AQ after execution? 

A Q 
Answer: AQ = 



00000001 74000000 



13.4.2 Transfer AQ to E 



I WDHMK 


1 WEMfiMJIMMSS 


mtm rats 


i : : , 1 W , , ■.,...,....'. 
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Description : Transfer the 48 bit contents of AQ to E (bits 47-00). 

A is transferred to Ey(bits 47-24) and Q is transferred 
to E L (bits 23-00). E Q (bits 51-48) and the sign of E 
are unaffected by the transfer. The contents of A and Q 
are not disturbed and remain after the transfer. 



Example : Divide the 48 bit operand in AQ by 0P48. Write the 
appropriate coding. (0P48) = 2. 

Answer: AQE Transfer Number to E for Div. 

SHAQ -47 Set AQ to sign of E 
DVAQ 0P48 (AQ) = Quotient, (E) = remainder 



At Start 

AQ = 



77777777 


77777765 



After AQE 

AQE = 



77777777 


77777765 


77777777 


77777765 



After SHAQ 

AQ = 



77777777 


77777777 



Aft-o-r nVAD 



AQE = 



77777777 


77777772 


00000000 


00000000 



13.5 SCALE AQ 



! ISCI1I8N 


GPESJIT!8N.MS91FIEBS UIRESS FlfU 








scaq k >*. ^ i 


< 1 : • 
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b = index designator 
k = shift designator 

Description ; AQ is shifted left, end around, until the upper two 
bits (46 and 47 a ^e unequal.) 

During the operation, the computer makes a shift 
count. A quantity K = k minus the shift count. 

If b = 0, this residue is discarded 



Example : 



If b = 1-3, the residue is placed in 
index register B^. 



AQ initial 
contents 



A 


Q 


03000000 


00 000000 



SCAQ 24,2 

Top bits of A = 000 011 000 etc. 

.To get top 2 bits unequal, shift left 3 places 



AQ becomes 



= 011 000 etc. 



30000000 



00000 000 



k = 24 
= 30 c 



10 



K = k - shift count 
= 30 8 - 3 

= 25q, which is placed in Index Reg. 2. 



Exercise ? If A contains 100B, and Q contains zero, what would be 
in A, Q and Index register 1 after execution of the 
following instruction? 



SCAQ 



2027B,1 



13.6 USE OF THE SCALE AQ INSTRUCTION 

It is used to pack floating point numbers. 

i 

Example : 



100 



8 



2 7 



400 OJ 00000000 



In previous example (using 100_) 
AQ, after scaling, was 



A 
















19 
















2 























!° 







































I 

















and Index Register 1 = 2007 
(a) Then shifting AQ to right li places 



00004000 



00000000 



(b) by storing AQ elsewhere, 

Reading Index Register 1 into A, 

and shifting it left 12 places, 

we have the exponent at the top of the AQ. 



A ^ 00002007 



20 70000 



after shifting 



( *\ "Dtr 4-V.^». r*AAA-r.~ V.-.«1, X~ A rv XT-_ _J 3 T • -1 __ 

V W ""«/ 1/iJ.ciJ. o.u-u.-Lj.ig uai;jl nj ■a.'ai, UUC B l/(JX _ CU VaXUe px'fcJVXOUSXy 

in AQ, (the normalized exponent) we have the packed 
floating point number 







A 




|Q 






2.0 7 





jOOOOOOO'O 






ST0RE 


1 ' 

, ST0RE+1 









4 


jo o o-o 


Final 


A 


Q 

A 


1 

10 


= 




2 7 


4 


io 0000000 
H ' 



(d) This will only work with positive numbers. 



(e) For negative numbers, complement the number first. 
Then pack the number, as above and complement, the 
packed number. 



13.6 (cont.) 



Alternate method for packing floating point numbers: 

If the computer has floating-point hardware and 
if the number to be packed is a single precision integer 
(24-bit operand), then the following method is used 
instead of the one just illustrated: 



SHAQ -24 F0RM 48 -BIT SIGNED 0PERAND 

SCA K2044 MERGE WITH PR0PER EXP0NENT 

FAD K2044 N0RMALIZE THE F.P. NUMBER 



UJP 
* 



K2044 0CT 20440000,0 F.P. C0NSTANT = 2044000000000000 



Here the FAD instruction is used to do the normalizing instead 
of the SCAQ. Also the normalizing is done after forming the 
floating point number rather then before. If the operand to 
be packed is larger than 24-bits or if the computer doesn't 
have floating point hardware, the number can be packed faster 
using the SCAQ instruction. 



BCD DIGIT OPERATIONS 

14.1 INTRODUCTION 

14.1.1 BCD Digits 

14.1.2 Field 

14.1.3 Sign Bits 

14.1.4 E D Register (In Machine) 

14.1.5 Eq Register (On Console) 

14.1.6 B CD Fault 

14.2 BCD INSTRUCTIONS 

14.2.1 Shift E D Register 

14.2.2 Eq Equal to ZERO Jump 

14.2.3 E D Less Than ZERO Jump 

14.2.4 E n Overflow Jump 

14.2.5 Setting Field Length in D Register 

14.2.6 Load E D 

14.2.7 Store E D 

14.2.8 Add to E D 

14.2.9 Subtract From E£> 

14.3 BCD TRAPPED INSTRUCTIONS 



Chapter j CI 



14.1 INTRODUCTION 
14.1.1 BCD Digits 

The BCD instructions handle 4-bit BCD DIGITS. These digits 
are the decimal digits 0-9 represented as follows: 

0000 - 

0001 - 1 

0010 - 2 

0011 - 3 



1001 » 9 

Each 24-bit word of storage is divided into 4 BCD Digit characters of 
6 bits, as shown: 



23 



IS 17 



12 11 



06 05 



00 



The lower 4 bits in each character are the BCD Digit. The upper 2 bits 
■in the least significant character is used to represent the sign of the 
field. 



14.1.2 Field 

A field is a group of BCD Digits, of a maximum length of 12 digits. 
The length of the field is stored in the D register , which consists of a 
4 bit register within the hardware. It is not displayed on the Console. 



14.1.3 Sign Bits 

This represents the sign of the field as a whole - not of the 
individual BCD digit. It is stored in the least significant digit in 
the field. The signs bits of the other digits in the field must be CO, 
or a fault is generated » 

If the sign bit stored is 10, 

the field is negative. 
For all other combinations, it is positive 



i.e, 



( 00 

c 

( 01 

( 
( 11 



xxxx 



xxxx 



xxxx 



positive field 



Example : 



00 0001 


00 0100 


00 0011 


00 1000 


00 0110 


00 0010 


00 1001 


00 0000 



- 1438 

- 6290 



If the Field is 7 digits long, the sign is stored with the least 
significant digit (i.e. the rightmost of the field, - 9). It is 00. so 

the number in memory is positive ■ 1,438,629. 



1 4» 1 ° 4 The En Register (in machine) - where hardware is available. 

This is a decimal register, consisting of 12 BCD decimal digits and 
1 overflow BCD decimal digit. 



14°1»5 The En Register (on console) - where hardware is available. 

Displayed in the AQ register as decimal numbers. Displays the 
full E n register plus 3 additional characters, as shown. 

Sign of 
digit being 
currently 
accessed 
+ or - 



+ 


1 


+ 


1 


12 DEC DIGITS 



Digits 
being 
currently 
accessed 



Sign of Overflow 
E D digit 

+ or - 



Max number in E n = 999,999,999,999 

If one more is added, the digit in the overflow position 
will become a one. 



14*1 »6 BCD Fault 

Programmer can arrange for an interrupt to occur if a BCD fault is 
discovered. He can also arrange to keep sensing for a fault without an 
interrupt . 

3 conditions will produce a, fault* 

(a) If the upper 2 "bits of any digit (except those of the least 
significant digit in the field) are not 00. 

(b) If an illegal digit is present 

i.e. any four bit combination greater than 9- 

e.g. 1011 = 11 is illegal 

(c) If the contents of the D register are greater than 12 (14 Q ) 

o 

BCD fault is sensed by the SENSE Internal Status Instruction: 

INS 4000 B 

If BCD fault, RNI P + 1 

If no fault, RNI P + 2 



14 o 2 BCD INSTRUCTIONS 
14q2q1 Shift Er. Register 



: locinoN 


flP[Ml!8N.«BDIFIHS M3JFSS FiflB 


■- 


S« *>,*. 






■ % . . > • * - • 


:= , .-:... ,!,<, .j.^^,.,,, 
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00 



70 





b 


k 



k = shift count 

b = index designator 

Description : The E D register i^ shifted in one character steps 
(i.eo 4 bits at a time) 

K => k + (B ) with sign extension 

(The instruction senses bits 0-3 and 23 only of the 

sum of k and (B ) . 

If bit 23 - 0, Shift is left, end off, zero fill. 

If bit 23 - 1, Shift is right, end off, zero fill.) 
N.B. : BOTH SHIFTS ARE END OFF . 

SFE 1 

Shifts Eq 1 character to left (i.e. shifts one digit 
to the left.) 



Example : 



Exercises: 



• 





T- ' 

; o o o 


1 

1 


1 

8 2 9 












! 

J 1 


18! 

1 


2 9 



3efore Shift 



After Shift 



(i) If the Ej) register contains 



678 | 437J 921 J 698 



What will it contain after the following instructions 



ENI 
SFE 



1,1 
3,1 



(ii) If the above result is followed by 

SFE -8,1 

What will be the final contents of Erf 



14.2.2 Ed equal to ZERO Jump 



ucntior 


flpEMiiM,Mwn£« *ea«ESS rati 




EZJ.EQ m 
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m = storage address 
Description: The contents of the 52 -hit E D register are compared with 



zero 



If (B D ) = 0, HHI address m 
If (Ejj) / o, HNI P + 1 



Example : EZJ,eq ENDL00P 
SFE 1,2 
UJP *+5 



ENDL00P LDA 

etc. 



144B 



14.2.3 E D less than ZERO Jump 



mm ! i8PE8MWI,iSB!HH$ U1KSS Hlti 



ga^r , w 
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m = storage address 

Description: The contents of the 52-bit E D register are compared 
with zero 

If (Ep) < HHI address m 

If (E n ) > HNI P + 1 



14.2.4 E D Overflow Jump 



IttiTIM ! jWEMIlM.iSWnEK MWtSS OEil 



JL 
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m = storage address 

Description : If the upper 4 bits of the E D register contain anything 
but zer0| control Jumps to address m. 

If Upper 4 bits contain zero, HNI P + 1 



14.2.4 (cont.) 
Examples t 






4 2 1 


3 5 7 


6 1 9 


1 

; 8 7 8 




4 











j 2 4 1 



- no overflow, jump RNI P + 1 



0/flow, jump RNI Address m< 



14.2.5 Setting Field Length in D Register 



i LKWW 


'W01 W'l'K MWSS Flfli 






SET y 
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y = field* length indicator 

Description : The instruction takes the lower 4 bits of y and puts 
them in the D register » Maximum length of field is 
143 for all operations except 3TE, when maximum length 
of the field is 15-B< The D register remains at the 

value set until it is set again. 



Exampl e : 



It is not cleared in Master Clear operations. 
SET 143 



Sets D regi, 



14 3 for field len* 



14°2o6 Load 5 p 



urn 


"■••t'lth mmi- n*. mum M 


Si 






U>£ 
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ONLY INDEX REGISTER 1 
CAN 3E USED 



b = index designator 

If b = 0, m is the unmodified address 

If b = 1, m is modified by (B 1 ) sign extended 

m = storage address (character address) 

Description* The instruction loads the E D register with a field of up 
to 12 numeric BCD characters . 'The field length is 
specified by the D register. Characters are put in 
the lower end of e d > with zero fill to the left. 

Example : SET 7 

LDE 400B 

100 
Find least significant digit 



3 6 8 9 

4 5 6 8 



14.2.6 (cont.) 



- M + (D- 1) 
= M + (6) =406 



Loads this character into £ D first, intc leftmost bits of 
E D . The B shifts one character, adds in next digits, shifts, 
etco When loaded D characters, zero fills rest of Ed from 
left* 



Answer : E = 



000003689456 



14.2.7 Store E 



D 



STE ', ; nt,Z 
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QKLY INDEX REGISTER 2 
CAN 3E USED 



b — index designator 

If b = 0, m is the unmodified address 
If b = 1, m is modified by (B z ) only 

m = storage address (character address) 

Description : 'The instructions stores a field of up to 13 decimal 
digits (3<.C.Do numeric characters), beginning at 
address M (the address of the most significant digit 
in the field). The length of the field is determined 
by the D register. 

The least significant digit is stored first, and the 
register is then Shifted right one digit. The next 
digit is stored, and the register shifted right again? 
and so on= NOTE THAT STORING DESTROYS THE CONTENTS OF E n < 

Example ; SET 143 

STE 400B 

E = 







746871264789 



Field = 12 characters 

Address of least = (D- 1) + M 

significant character /„,\ / , nA 

= (13) + 400 

= 413 

= 100 001 011 

Character address = = 00 1 000 010 11 

= Word 102 
character 3 

12 digits in E stored as follows : 



100 
101 

102 



7 


4 


6 


8 


7 


1 


2 


6 


4 


7 


8 


9 



14.2.7 (cont.) 



NOTE: 



DUMP OF MEMORY : 

If an area of memory containing BCD numeric characters is dumped 
out, the 6 "bits for each character (2 sign bits, and 4 hits for the 
digit) will be dumped in octal numbers: 

e.go 00 1000 « 8 in BCD digit 

But would be 001 000 ■ 10 in octal during dump* 

Example : A block of memory is as follows (Characters are BCD Digits) 



100 


4 


7 


8 


9 


101 


6 


4 


3 


1 


102 


8 


7 


4 


9 


103 


6 


2 


1 


3 



A program 


working 


on this is as follows: 


SET 


12B 




LDE 


4023 


(a) 


SET 


6 




STE 


405B 


(h) 


SET 


14B 




LDE 


403B 


(c) 



What would be contained in % at the end of the operations? 



14.2.8 Add to E 



D 



IKATIOK 



OPERJUIgNJBIIFIHS tSGtfSS flflO 



ADE 



»,3 



MODIFIED BY INDEX 
REGISTER 3 ONLY 



23 18 17 16 



66 



00 



b = index designator 

If b = 0, m is the unmodified address, i.e. M = m 
If b - 1, m is modified by (B 3 ) only , M = m + (B 3 ) 

m = storage address (character address) 

Description : This instruction adds 'D' numeric BCD digits to the E n 
register. The 'D' digits are lined up with the lower 
»D' digits of the E D register before they are added. 
The E D register has a maximum capacity of 13 digits, 
i.e., 12 digits plus overflow digit. The maximum number 
of digits in the number to be added is 12, i.e., D may 
not be greater than 12. M is the most significant digit 
of the number to be added. M + D - 1 is the least 
significant digit. 



14.2.8 (cont.) 

Example * If (2q) 



OOOlOOO ! 876| 543 



And a block of memory is 



100 


7 


2 


4 


9 


101 


1 


5 


8 


2 


102 


6 


1 


3 


6 


103 


2 





8 


4 



Answer; 



What will "be the contents of E D after the following 
instructions are executed? 



ENI 
SET 
ADE 



1,3 
10B 
400B,3 



(a) M 



m + (B J ) 

400 + 1 = 401 



Add to E D 8 character the least significant of 
which will he 



M + (D -1) 
=401+7 
= 410 

Ed = 



o 







r 1 T- 1 

000 i 000 j 876 J 343 | 
1 



000 ! 024 I 915 i 826 



Final E D - 



000 



025 ; 792 i 369 



14.2.9 Subtract from E 



D 
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b = index designator 

If b = 0, m is the unmodified address, i.e., M = m 
If b = 1, m is modified by (B 3 ) only, M = m + (B 3 ) 

m = storage address (character address) 

Description: As for ADE S except that the field of up to 12 BCD digits 
is subtracted from the E D register. 



14.3 BCD TRAPPED INSTRUCTIONS 

All BCD instructions may be used in any 3200 Computer, regardless 
of the model of the processor. Where the processor lacks the BCD hardware 
package necessary for direct processing of BCD instructions, the implement- 
ation of these instructions is carried out by a special software package. 
The instructions are then known as "trapped" instructions. 

(it should be noted that where the software package is used, the 
contents of the Ed register cannot be displayed on the console, because 
the Ed register hardware does not exist.) 

The B.C.D. instructions are detected by a translator as they appear 
in the Function register, and trapped. They are processed like 
interrupts, and the following action takes place 

(a) P + 1 is stored in the lower 15 bits of address 00010 

(b) The upper 6 bits of the Function register are stored 
in the lower 6 bits of 00011 - the upper 18 bits of 
00011 remain unchanged. 

(c) Program control is transferred to 00011, and a RNI cycle 
is executed. 



COMPASS PSEUDO INSTRUCTIONS 



15.1 CONCEPTS OF PSEUDO INSTRUCTIONS 

15.2 PROGRAM DEFINITION 

15.2.1 IDENT Instruction 

15.2.2 END Instruction 

15.2.3 FINIS Instruction 

15.3 ASSEMBLY AREAS 

15.3.1 Introduction 

15.3.2 DATA Area 

15.3.3 Return Assembly Control to Subprogram PRG Area 

15.3.4 COMMON Area 

15.3.5 ORGR Instruction 

15.4 STORAGE RESERVATIONS 

15.4.1 Word Block 

15.4.2 Character Block 

15.5 ENTRY AND EXTERNAL INSTRUCTIONS 

15.5.1 ENTRY Pseudo Instruction 

15.5.2 EXTERNAL Pseudo Instruction 

15.5.3 SCOPE Loading of Subprogram 

15.6 SYMBOL DEFINITION BY EQUIVALENCING 

15.6.1 Introduction 

15.6.2 Word Equating 

15.6.3 Character Equating 

15.7 COMPASS OUTPUT LISTING CONTROL 

15.7.1 REMarks 

15.7.2 NO LIST Instruction 

15.7.3 Resume LISTing Instruction 

15.7.4 SPACE Instruction 

15.7.5 New Page EJECT Instruction 

15.7.6 TITLE Instruction 

15.7.7 Comments 



Cha 



P ter I H 



15«1 CONCEPTS OF FSEUDO INSTRUCTIONS 

A fetter name would be "Assembly-Control" instructions. 
They are simply instructions from the programmer to the assembler. 

They will be used during assembly only. Program execution 
can make no use of them. 

e.g. BSS 4 is an instruction to the assembler to set aside 4 words 
of storage somewhere in the storage area. The 4 words are set 
up during assembly and then the function and usefulness of the 
BSS instruction is finished. 



15.2 PROGRAM DEFINITION 
15.2,1 IDENT Instruction 



1 10OSIIO* 


1 'OPEaAliON.MOOIFIERS ADBSKSS FiClB 








WENT m 






\. ■>. i l,,,»:l. 
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Description : The Location field is "blank. However i f a symbol is 
written in it, COMPASS will ignore it. COMPASS picks 
up 8 or less alphanumeric characters from the address 
field, the first of which must he alphabetic. The 
Address field terminates at the first blank or the 
eighth alpha-numeric character, whichever is the first 
encountered. A period may appear in m. 

m = PROGRAM NAME 

This will appear on the top of each page of the 
assemhly listing. 

The IDEM 1 card must "be the first card in the program 
or the job will he terminated. 

Examples : (a) IDENT TEST F0R ILLEGAL SYMBOLS 



END 

Program name will be TEST 

/-, \ i- -^-r-ni-rm n.^MITlTm Iffa TO (Tl CTOITIT'KTri mljt inA'DTPO. 



END 

Program name will be C0NTINU$ 
15,2.2 END Instruction 



1 UCATiOH 


: |«M1W,1»IHHS tt!«SS flfli 


i END m 


\ |,,S,.:li«.; 


M i 



Description : The location field should be blank. If a symbol is 
present, it is ignored by COMPASS. 
The END instruction terminates the sub program. % The 
final instruction in a COMPASS Sub-program must be 
an END instruction. 

Symbolic Transfer Address 

The "m" signifies a symbol in the address field of some 
subroutine which has declared it to be an entry point. 
This address is called the Symbolic Transfer Address and 
need not be in the subroutine terminated by this END card. 

Examples : (i) A program of one subprogram. 

The symbolic transfer address must appear, and the symbol 
must be defined within the subprogram as an entry point. 

FIRST 



END FIRST 



IDENT 


TEST 


ENTRY 


FIRST 


UJP 


** 



15.2.2 (cont.l) 



(ii) A program of more than one Compass subprogram 

The symbolic transfer address must appear in 
one of the END statements, and be defined as 
an entry point as before. 



Example* 



I DENT 
ENTRY 
FIRST UJP 



TEST 

FIRST 

#* 



END 



IDENT WRITER 



END FIRST 
Note that this program could have appeared as follows: 

IDENT TEST 



ENTRY 
FIRST UJP 



FIRST 
*# 



END 



FIRST 



IDEM 1 WRITER 



END 



(iii) A program of COMPASS and FORTRAN subprograms. 

A symbolic transfer address should not appear 
in any END statement in the program, if the 
FORTRAN program is the main program. 



15.2.2 (cont.2) 

Example : PROGRAM TEST 
CALL 0NE 
CALL TW0 

END 

IDENT 0NE 



EOT) 

IDEET TW0 

END 



If the PORTRAIT is a subroutine of a COMPASS subprogram 
a transfer address should appear in the END statement 
in the COMPASS subprogram. 

TRA Card diagnostic 

Where an error occurs in using symbolic transfer 
addresses, the error is flagged by the Loader when 
the program is loaded, and execution is not attempted. 

The flag "TR" is shown (after the Load card is listed) 
on the standard output unit. 



15.2.3 FINIS Instruction 



OCSIIM ; iW IJOTIN JIDMBS JiiMfSS fltlS 

— — - j jpj^jg" - _ _- | _- 



Description : Symbols in the location and address fields are ignored. 
The instruction tells the assembler that it has reached 
the end of the assembly, and that all sub-programs have 
been assembled. If the FINIS card is put in out of 
order, the assembly will be terminated when it is 
reached. Control is returned to SCOPE when the 
FINIS card is read. 

Example : IDENT TYP0UT 



END 

IDENT S0UT 

END 

IDENT TYPIN 



END 
FINIS 



15.2.3 (cont.) 



Where FORTRAN and COMPASS subprograms are used in the 
one subprogram, the FINIS card is used to indicate the 
end of each group of subprograms. 



^ample: 7p0RIRAN,L,-X 

PROGRAM 0NE 



END 

SUBR0tJTINE TW0 



END 
FINIS 



7C0MPASS.L,X 

I DENT THREE 



END 
FINIS 



15.3 ASSEMBLY AREAS 
1 3 « 3» 1 Introduction 

'There are 3 areas in any sub program assembly 

(a) Subprogram Area. 

In this area all normal parts of the subprogram 
are assembled. 

(b) COMMON Area 

Parts of the program declared to be in common are 
assembled in this area. 

(c) DATA Area. 

fares declared z^ contain lata are assembled in 
thi& ...rea. 

Three counters are used at assembly time to put parts of program 
in sequential places in the areas above. These counters are incremented 
to give the current address of the instruction being assembled in the 
particular area in which the assembly is taking place. 

15.3.2 DATA Area 



TA'-i 1 OFEHMlM.MMlfii'i 


;S igMESS 


•' 3 


mm 













Description ; Information may be put into the Data area at assembl; 



;ime. 



There may be no ref erence to an external symbol, 
"nor can any symbol in the DATA area be an entry " 
point for th e subprogram in which it occurs" 
The instruction specifies that all information 
following is to be stored or identified as part 
of the DATA area, until PRO or COMMON or END 
occurs. Any instruction or pseudo instruction 
may follow DATA. The DATA area is shared by all 
subprograms at execution time. 
The Location and Address fields should be blank. 

Sample; IDSNT BINBCD 



DATA 

B5S 2 

DATA #CT 273 

END 
NOTE: 'The total DATA area must be defined in 



the first subprogram loaded. 



15«3.2 (cont.) 

Example : 



I DENT 



MAIN 



MEMORY ALLOCATION 
AT LOAD TIME 



LATA 

) 

) 

)5 INSTRUCTIONS 

) 

) 
0RGR 100B 



BS3 
PRG 



END 

IDi^NT 



DATA 
#RGR 



PRG 



END 



50 



MAIN 
SUBPRG1 



INSTRUCTIONS IN 
SUBPROGRAM AREA OF 
SUBPROGRAM SUBPRG1 



FIRST 5 INSTRUCTIONS 
IN SUBPROGRAM MAIN 



DATA AREA USED IN 
SUBPROGRAM SUBPRGl 



AREA RESERVED AS A 
BSS IN SUBPROGRAM MAIN 



INSTRUCTIONS IN 
SUBPROGRAM AREA OF 
SUBPROGRAM MMN 



Upper Boundary of 
Available Memory 



15.3.3 Return Assembly Control to Subprogram PRG Area 



ue/mos 


QPEfUMKJBaiFKiS MMfSS FIEU 






^ , . , . . ■ PRG . , , 


;, :..,, . 


! 1 

_<J-L^.i_ ■^l^±lj^:-'!' »H'ii:inn.i«!.t«i«iii. 


«i»^.iMf»an 


4!M 



Description ? All instructions "that follow are to be assembled 
in the subprogram area. 

The PRG instruction may be used to signal the end 
of the DATA or the COMMON areas. 

Example i IDENT BLOCKER 

DATA 
SCALEF 0CT 273 

0CT -0 

C0MM0N 
INBUFF BSS 100 

PRG 



»1 

PRG Apa 

Program 
Length- 1 

0' 



DATA Area 

100 
161 ( 

o' 

PRG Area 

Program 
Length -1 



DID 



15.3.4 COMMON Area 



mmm I wciAiJJss.issireis m$m nm 



Description : The instruction la"bels and reserves space in the 
common area. 

No information can be put into the area at assembly 
time . If this is attempted, an error listing is 
given. COMPASS assumes that a PRG card had been 
included before the instruction and resumes assembly 
in the subprogram area. 

The COMMON area is shared by all subprograms at 
execution time. 

Note: COMMON is the same for all subprograms. If 

it is desired to have separate areas, ORGR instructions 

must be used to separate them. 



Example: 



I DMT 



TEST 



W0RKAREA 



Cfe0N 
BS3 



100 



END 
I DENT 



SUBEDIT 



L0C 



C$KM0N 
BSS 



60 



END 



In this program, the common area will be overlapped 
by the two subprograms. 



COMMON 



SUBPROGRAM 1 SUBPROGRAM 2 




+1 



+99 



W0RKAREA 


L0C 









W0RKAREA and 
L0C reference 
the same word. 



59 



This can be used to reference the same words in 
common in two subprograms. 



15.3.4 (cont.l) 

Example s 



Setting up common area in 2 subprograms 

IDENT MAX 

C0MM0N 

TEMP BSS 10 

CTABLE BSS, C 6 

PRG 



END 
IDENT 



SUBPR0G 





C0MM0N 




QT0TAL 


BSS 


12 


FLAGS 


3SS,C 

FRG 


4 



END 



The area will "be set up as follows: 



TEMP 




QT0TAL 


TEMP+1 




QT0TAL+1 


TEMP+2 




QT0TAL+2 


TEMP+3 




OT0TAL+3 


TEMP+4 




QT0TAL+4 


TEMP+5 




QT0TAL+5 


TEMP+6 




QT0TAL+6 


TEMP+7 




QT0TAL+7 


TEMP+8 




QT0TAL+8 


TEMP+9 




QT0TAL+9 




CTABLE 


DTABLE+1 


CTABLE+2 


CTABLE+3 


QT0TAL+1O 




CTABLE-^ 


:table+5 


not used by MAX 


QT0TAL+11 




FLAGS 


FLAGS+1 


FLAGS+2 


FLAGS+3 


FLAGS 



15.3.4 (cont.2) 



Note: The only instructions which can be used in the 
COMMON area are as follows, 



3SS 


jZRGR 


BSS, C 


IFT 


EQU 


IFN 


EXT 


IFF 


ENTRY 


IFZ 


COMMON is t ermine 


L ted by PRG 




DATA 




or END 



15.3.5 ORGR Instruction 



taCATiOW : !OKSAli«JWKS M1I BS FIE1 B 



Description : This instruction controls the relocatable address for 
storage of instructions, constants, or the reservation 
of space in any of the three storage areas. 
The location field is ignored by COMPASS, but printed 
on the listing. 

Any symbol used in the address field must have been previously 
defined in the storage area being referenced. If 
COMPASS is assembling into one area, and an ORGR occurs 
with a different area relocatable symbol in the address 
field, an error results. COMPASS ignores the ORGR, 
but puts an error flag on the listing. 

Example: 



DTAG 



I DENT 


0RG 


DATA 




BSS 


2 


0CT 


227 



PRG 



0RGR 



END 



DTAG+1 



Note: the error flag "A" set to show the error in 
the address field. DTAG is in the DATA area, and 
cannot be used in an ORGR statement in the SUBPROGRAM 



area. 



15.3.5 (cont.) 



ii) 



IDENT 


HARRY 


0RGR 


100B 


LDA 


GIT 



END 



The first instruction (LDA CIT) will be assembled 
in Location 100, and the rest will be stored 
following it. 



iii) 



START 



IDEET 


0RGRTEST 




ENTRY 


START 


ST0RAGE ADDRESS 


0RGR 


50 




UJP 


** 


00062 


LLA 


GlJZf 




5TA 


CI0BL0CK 







UJP 


02010B 




G0NTABLE 


0CT 


0,-1 


00076 and 77 




0RGR 


*+50 




INPFLAG 


0CT 





00162 




0RGR 


INPFLAG+20 




0NE 


0CT 


1 


00206 




EED 


START 





15.4 STORAGE RESERVATIONS 

This is made in the area currently being used. The 
address field will- determine the number of words or character 
positions to be reserved. 

1 5.4.1 Word Block 



[ 10CATION 


! WESMIMJSMFKW MIKSS Flit! 


| ....... l 3SS . ,:'*:; 


i . ■ t ■ > ■ * -■> i. -- 


i 1 



m = a constant, a symbol, or an address 
expression. 

Description; (i) The instruction reserves and labels a block of 

word storage. A symbol in the location field is 
the 15-bit, relocatable word address of the first 
word in the block of storage. 

(ii) The address field specifies the number of locations 
to be reserved. It may be 

(a) a constant 

Example: STATUS BSS 2 

DISKBUFF BSS 745 

(b) a symbol 

Example: VARINP EQU 5 

INPAREA BSS VARINP 

Note that the symbol must not be a relocatable 
address, or an error results: 

VARINP 0CT 5 
A INPAREA BSS VARINP 

(The "A" indicates the address field error.) 

(c) An address expression which results in a 
non relocatable value. 

Example: VARINP EQU 5 

INPAREA BSS VARINP+7 

If the symbol is a relocatable address, an 
error results. 

VARINP 0CT 5 
A INPAREA BSS VARINP-2 

(The "A" indicates the address field error). 

(iii) The double asterisk is illegal 

i.e. PRINTBUF BSS ** 



15.4.1 (cont.l) 



Description: (Continued) 

(iv) If an address field is zero or in error, the 
symbol is defined, but no storage is reserved. 



Example ? 



TAG1 


BSS 


1 


TAG2 


BSS 


** 


TAG3 


BSS 


1 


TAG4 


BSS 


2 



The second instruction is illegal, and no location 
will be reserved forTAG2, but TAG2 is defined. It 
will reference the same word asTAG3. 



i.e 



TAGI 
TAG2 and TAG3 
TAG4 

TAG4+1 



(v) All symbols used in the subprogram must have 
storage allocated to them: 



IDEKT 
LM 
IBA 
STA 



MATHIX 
CjZlUNT 

C0U1IT 



C0UNT BSS 



END 

(vi) NOTE : Where no symbol is used, storage is reserved 
but not labelled. It may be referenced from other 
labelled locations. 



Example; 



TAGI 0CT 4 

BSS 3 

TAG2 0CT 27 

BSS 3 

TAG3 0CT 14 



15.4.1 (cont.2) 



Description : (Continued) 



The "block of storage set up will ba: 



TAG1 


00 00 00 04 






<•** 








TAG2 


00 00 00 27 














TAG3 


00 00 00 14 



The location marked *** may be referenced a^ 

TAG1+2 
or TAG2-2 
or TAG3-6 



15.4.2 Character Block 

riiiiif i ignsiiitifJiDSFiHs wohess heii 
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Description; Reserves and labels a block of character storage 
in the area currently in use. 

(i) A symbol in the location field is the 17 bit, 

relocatable character address of the first character 
in the block. 

(ii) The address field specifies the number of characters 
to be reserved. It may contain 

(a) a constant 

Example : CTAG1 BS3, C 6 
CTAG2 BSS, C 2 

Storage will be reserved as follows: 



CTAG1 



CTAG1+1 



CTAG1-H CTAG1+5 



CTAG1+2CTAG1+3 



CTAG2 



CTAG2+1 



15.4.2 (cont.) 



(ii) Continued 

(b) a symbol 

Example : SIZE EQU 5 

PARLIST BSS,C SIZE 

Note that the symbol must not be a relocatable 
address or an error results. 

SIZE OCT 5 
A PARLIST BSS,C SIZE 

(The "A" indicates the address field error). 

(c) an address expression which results in a 
non-relocatable value. 

Example : SIZE EQU 15 

PARLIST BSS ,C SIZE-3 

(iii) If a BSS, C instruction is followed by a BSS 
instruction, it forces any following character 
reservation to a new word, even if the last character 
word is not filled. 

Example: INPFLAGS BSS,C 6 

BSS 
0QTFLAGS BSS,C 2 

Storage is reserved as follows: 



INPFLAGS 


INPFLAGS+1 


INPFLAGS+2 


INPFLAGS+3 


INPFLAGS+4 


INPFLAGS+5 


Not Used 


0UTFLAGS 


0UTFLAGS+1 


Not Used 

— 



15.5 ENTRY AND EXTERNAL INSTRUCTIONS 
15.5.1 ENTRY Ps„eudo Instruction 



JJM1JM \ i8P £8IHi§li , MBBJfl» S MB 8 ESS FlEl g 



Description The location field should he "blank, hut if a symbol 
does appear, it will he ignored hy COMPASS. The 
address field contains one of more location names 
separated hy commas. No "blanks may occur. The 
field terminates at the first "blank, or at Column 
73* If there are more entry points to he defined 
than will fit on one card, a second card can he 
used. 

Each of the address field location names contains 
a symhol defined as a subprogram relocatahle word 
address hy appearance in a location field elsewhere 
in the suhprogram. 

Example : 



IDENT 


0m 


ENTRY 


START, INT0 


START UJP 


** 


ENA 






INT0 UJP ** 

END START 

Note that more than one entry card can he used. 
IDENT TW0 



ENTRY 


START 


ENTRY 


INT0 


START UJP 


** 



INT0 UJP 



END START 



15.5.2 EXTERNAL Pseudo Instruction 



leciriM 


OPEMHBIfjaDIFfEK MBKSS FIEtS 






&T m,,*k, m t, - r 
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Description : The location field should he "blank. Any symhol appearing 
there will he ignored hy COMPASS. The address field 
contains one or more location names up to Column 73* 
These must be separated hy commas. No "blanks may occur. 
A symhol in the address field may not be defined in the 
subprogram in which the EXT instruction appears. 
The EXT instruction can only reference location names 
in the suhprogram area of another suhprogram. It 
cannot reference DATA or C0MM0N areas. 



15.5.2 (cont.l) 



Example ! I DENT MAIN 

ENTRY NUMBER 



NUMBER 0CT 37 



END 

I DENT SUBPR0G 

EXT NUMBER 



LDA NUMBER 



END 

All subprograms within a main program are assembled 
independently, and all symbols in a subprogram are 
local to that program only, unless declared as 
external symbols in another subprogram, and as entry 
points in the former program. 

Example : I DENT DRIVER01 



LDA TAG 



TAG 0CT 14 
END 
I DENT DRIVER02 



LDA TAG 



TAG 0GT 27B 
END 

The two Symbols (TAG) are not linked in any way. 
Each will be referenced only by the subprogram in 

which it appears. 



15.5.2 (cont.2) 

BUTj If they refer to the same symbol, the 
Program could appear as follows* 



IDENT EDIT 
EXT GARDBUFF 



LM CARDBUFF 



END 

IDENT READ 
ENTRY CARDBUFF 



LDA CARDBUFF 



CARDBUFF 0CT 24 



END 

Address arithmetic is not permissible with external symbols 

e.g. LDA CARDBUFF+2 
But, address modification is permissible 

e.g. LDA CARDBUFF, 3 

15»5«3 SCOPS Loading of Subprograms 

The Assembler establishes links between the subprogram as 
directed by the EXT and ENTHY instructions. These linkages are then 
set up by the Loader (a part of the SCOPE monitor) when the assembled 
program is loaded prior to execution. 

If an external is referenced in a subprogram, but there is 
no ENTBY for it in any other subprogram, SCOPE will look through the 
Library Tape to see if it can find a Library Routine to enter. 

IDENT QUAD 
EXT SQRTF 



RTJ SQRTF 

END 

IDENT DISC 

* 

END 

If it can find no Library routine of the same name, it will 
give an error symbol, and terminate the run. (This is done at Load Time, 
not in Assembly) . The error symbol appears on the listing after the 
LOAD card print out e.g. LOAD, $6 

DISC UD SQRTF 



15.5«3 (cont.) 



The COMPASS assembly listing of a subprogram containing 
external symobl references will have the usual format, except that 
the address field will be prefaced by an X. 



Exampl e; 



00010 00 1 X00003 



The digits following the X are the reloctable word address of a 
previous instruction in the subprogram area which references the 
external symbol. The first (or only) reference to the external 
symbol will contain X77777 in the address field. COMPASS thus 
produces a "threaded list" of instructions referencing the external 
symbol . 



Example : 



I DENT 
EXT 



Program 

TEST 
CI0 



Listing 



ENA 



10B 



00000 14 6 00010 



ETJ 



CT0 



00010 00 7 X77777 



RTJ 



CI0 



00030 00 7 X00010 



RTJ 
END 



CI0 



00050 00 7 X00030 



The address of the last instruction referencing the external is placed by 
COMPASS into the XNL Loader Card to begin the backward threaded list. When 
the loader loads the program, it enters the actual address of the external 
symbol into the address portion of each instruction referencing the external. 
It does this by saving the address portion of the last instruction referencing 
the external symbol, it then replaces the address with the actual address of 
the external symbol. The loader then, repeats the process using the saved 
address as the new last instruction address referencing the external symbol. 
The process continues until the address of the next instruction in the list 
is 77777, which indicates all instructions referencing this external symbol 
have been modified. 

Thus, if CI0 is loaded at address 00106, the program will be loaded into 
storage as: 



00000 14600010 



(ENA 



10B) 



00010 00700106 



(RTJ 



CI0) 



00030 00700106 



(RTJ 



CI0) 



00050 00700106 



(RTJ 



CI0) 



13.6 SYMBOL DEFINITION BY EQUIVALSKCING 

15 « 6.1 Introduction 

A symbol may be defined by equivalencing it to another symbol, 
a constant, or an expression. The symbol may be defined as an absolute 
value, a relocatable word or relocatable character address „ The symbol 
in the location field is equivalenced to the value of the address field. 
A symbol which, is declared an entry point must not be equated to a symbol 
which is declared external. When symbols are equivalenced they are 
identical and interchangeable. 

All symbols in the address field of an equivalence must have 
been previously defined by the appearance in the location field of a 
preceeding instruction, or in an EXT pseudo instruction. 



15.6.2 Word Equating 



| LOCHTiOM 
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1 ,,,.,., j \EQU . 
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Description : The symbol is equivalenced to another symbol, a 

"]j—o±ii woru. address, or a 1^— bit vaj.ue« The symboj. 
in the location field will be non-relocatable or 
relocatable, as determined by the address field. 

If the location field is blank, an error occurs. 
The address field may contain 

(i) An integer, modulo 2 -1(15 bits or less) 
(ii) A symbol, previously defined 
(iii) An address expression containing symbols 
previously defined. 

If a symbol in the address is defined as relocatable 
in a given area, the symbol in the location field 
will also be relocatable in that area.. 

Examples: SYM30L EQU 57641B 

DATE EQU 27B 

TEMP 333 1 

3YM EQU TEMP 

TEMP2 EQU SYM+6 

Assembled as follows: SYMB0L 576-41 

DATE 00027 
00165 TEMP Storage reserved 
SYM 00165 
TEMP2 00173 

TEMP, SYM and TEMP2 are relocatable. 



15.6.3 Character Equating 



mm* 
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Description : The symbol is equivalenced to a 1 7-bit address, 

a 1 7-bit value or another symbol. The symbol will 
be nonrelocatable, or relocatable, as determined by 
the address field. If the location field is blank, 
an error occurs. 
The address field may contain 

(i) An integer, Modulo 2 -1(17 bits or less) 

Example: ABADD EQU, C 372B 

ABADD is equivalenced to the 17-bit character 
address 372, which is word 76, character 2. 
This word address is shown on the listing: 

000762 ABADD EQU,C 372B 
00027 DATE EQU 27B 

(ii) A symbol previously defined 

Example : SYM BSS, C 1 

NDFLAG EQU, C SYM 

If the address of SYM is 00013, the value 
of NDFLAG will be 13 also. 

(iii) An address expression, containing symbols 
already defined. 

Example : NDFLAG EQU,G SYM-4 

If the address of SYM is 00013, the value 
of NDFLAG will be 50. 

Word address 13 = character address 54 

- Jl 

NDFLAG = character address 50 



15.7 COMPASS OUTPUT LISTING CONTROL 

The programmer can control output listings under C0MPASS 
with these instructions. They are written in the same way as any 
other instruction. 

15-1 »1 REMarks 



I IKMlM 


C:---i. ,nW-\i<:. 


MHESS FKiB 




I ■ - i 


* £ m .,,,,.: 


, = 5 = ¥ , . 
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Description; Any remark may be inserted into the source program, 
to appear on the output listing. All columns except 
9-13 may he used. 



Example; 



THIS IS 



10 13 

HIM 



REMARK INSTRUCTION 



15.7.2 NO LIST Instruction 



CATION ; IMgiUMJBfHfKSS IM«SS FKt 



NfLIST 



Description ; The instruction suppresses listing of the subprogram 
until the instruction LIST is encountered. 
However, if lines containing errors are encountered, 
they will be printed out, regardless of the N0LI3T 
instruction. 
The instruction will not appear on t:ie output listing 



15.7.3 Resume LISTing Instruction 



MMFffte ADBRESS 



LIST 



Description ; The instruction resumes output listing after a 
NOLI ST instruction 

If LIST occurs without a proceeding N0LI3T statement 
it is ignored. 



15.7.4 SPACE Instruction 



LOGS! 



"space ~ ' n~, T - 



Description; The instruction instructs the printer to skip m 

lines of print, or go to the top of the next page, 

whichever is the less. 

m is an unsigned decimal integer. 

Examples; (i) SPACE 2 

2 lines are skipped on the printer 

(ii) If only 3 lines remain in the page, 

SPACE 10 

will cause the printer to skip to a new page 
and begin in line 1 of the page« 



15.7.5 New Page EJECT Instruction 



ISCATfOM 
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1 



Description : 



The page being printed is fed through the printer, and 
the line following the EJECT instruction will be the 
first line of listing on the new page* 
The address field must be blank or an error will occur, 
although comments may be inserted from column 41. 



15.7.6 TITLE Instruction 



18MTI8K 



iOP ESit i i§h . MiBiFir^s mux nm 

fTIJlM title to fce^edf 



Description : Normally the name of the subprogram will appear at 
the top of each page of listing of the subprogram. 
If another title is required instead, it can be 
inserted using this instruction* The heading obtained 
from the IDENT or previous TITLE instruction is 
replaced, and the first page following the TITLE 
instruction will have the new heading,, 
If the new heading is to be inserted immediately, the 
instruction EJECT should immediately follow TITLE. 
If the new title is to be used on the first page of 
the listing, the TITLE instruction must immediately 
follow I DENT. 

The title must be contained in columns 20-72 of the 
address field. 

Example s: (i) IDENT TEST 

TITLE TEST F0R ILLEGAL CHARaCriRS 



This will cause the full title to be printed 

on the first and subsequent pages of the listing 

of the subprogram. 

(ii) IDENT TEST 

TITLE TEST F0R ILLEGAL CHARACTERS 



TITLE 
EJECT 



PRINT 0UT CHARACTERS F0UND 



END 



The first title will be printed on all pages until 
the second TITLE instruction is found. A new page 
will be begun by the EJECT instruction, and it 
will bear the new title. 



15»7»7 Comments 

When C0MPASS detects a card with an asterisk in column 1, it 
prints the content of t ' \« card as a comment. No other action is performedc 
Note: The asterisk itse ; f is not printed. (See also Section 2.2.3.1) 
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Chapter |M 



16.1 INTRODUCTION 

Under SCOPE, Input/Output devices are specified by Logical 
Unit Numbers (LUN's) which are organized according to function.* The 
programmer or operator assigns the logical unit to a particular type 
or unit of hardware, through SCOPE control. 

Logical Units may be specified as 

(i) Programmer units, 

(ii) Scratch units, 

or (iii) System units. 



1 6 o 1 . 1 Programmer Uai t s 

They are for general purpose use by the programmer, and they 
are unrestricted as to use in any run in a job. 

Once defined, the definition of the programmer unit is 
fixed for the whole job. They are released by SCOPE at the end of 
the job, unless saved by the programmer by the use of a SCOPE unload 
card. 

Programmer units are numbered 1-49* 



16q1.2 Scratch Units 

Scratch units must be defined for each run, and are released 
at the end of the run. They are assigned and used by Library programs, 
and may be accessed by the programmer for temporary useo 

Scratch units are numbered 50-55* 

They cannot be saved by the programmer. 



16.1.3 Systems Units 

Systems units are assigned to specific physical equipment 
within SCOPE, but these assignments may be altered by the operator. 
They are used for certain common functions, and may be protected by 
SCOPE from input-output requests which might destroy their contents. 

Systems units are numbered 56-63, as follows: 

56 Load and Go (for storage of object decks from 

assembly, prior to Loading and 
Execution) 

57 Accounting 

58 Comments from operator (only read requests allowed) 

59 Comments to operator (only write requests allowed) 
6° Standard Input (protected Gainst, writing, etc. ) 

61 Standard Output - holds li stable output 

62 Standard punch - output from COMPASS, etc. 

63 Library o 



j6.2 CENTRAL INPUT/OUTPUT ROUTINE 

16«2.1 Introduction 

Input/Output requests in COMPASS programs are written as 
calling sequences for monitor routines controlled by a central Input/ 
Output routine called CIO. 

CIO performs the following functions: 

(i) Selects an available channel 

(ii) Rejects requests if 

(a) the unit is not- available (e.go due to an 
operator error) » 

(b) no access channel is available 

(c) an illegal instruction (function code) is given.. 

(iii) Provides the current status for all requestso 

(iv) Initiates all I/O operations, and then returns 
control to the main program so that processing 
may continue while the I/O operation is carried 
out« 

(v) Responds to external interrupts, and transfers 

control to a routine specified by the programmer. 



16°2q2 Calling Sequences 

Input/Output operations are specified by entering an octal 
function code and other parameters into a calling sequence. The function 
codes are 



Function Code 


Request 


01 
02 


Read 
Write 


03 
04 


Read backwards 
Rewind 


05 
06 


Unload 
Backspace 


07 
10 


Space forward past 1 E0F 
Space backwards past 1 E0F 


11 
12 


Write E0F 
Erase 


13 
14 


Status 
Format 



There are 4 operations performed with CIO 

(i) i/O operations 

(ii) Tape control operations 

(iii) Unit Status operations 

(iv) Format selection operations o 



16.2.3 Input/Output Operations 

The function codes used by Input/Output operations are: 

(a) 01 READ n words, starting at FWA (First word address) 

(b) 02 WRITE n words, starting from FWA 

(c) 03 READ BACKWARDS, n words, and store backwards, 

starting at FWA+n-1. 

Calling Sequence : 

Input/Output operations are requested by the following sequence 
of instructions. 



LOCATION ! iOPEHATIOH.MODiriERS ADDRESS FIELD COMMENTS 



60 , JIA ..,,,.„, i.££iL ^.i 



JLJ L 



Li-LIO. 
j_j_.l i J._1_L L_L-_L_i J_J L_i_J I I — L 



(jL+Z) UJP _ _ £^ ^IMS 

Yl+4-) M , tflMfKir of Uj)ord& 









f ! +u\ ftesr rpsT<zocTjxki zteajT6b oH& keroeti pzqm ex 

\^'- rr 'i}\ .:..,: j J, ; .L..i.„J_i :. ! J f i_±..J. LJ L I i L...1 _t i LiJ L_i. l_L 1..J ! 






J 1„_ 



front citf sW<* fee /<Ka+W af LfS i«s+**t 

j_a_j_a_j_JL_i-j_j_J~J-^^ 



»f L*-(d. 



Notes : (a) The logical unit number (LUN) is defined by an EQUIP card, and 
may be 1-63, depending on function code. 

(b) The function code is an octal number, 1-14 as defined previously. 

(c) The interrupt indicator selects an interrupt on normal or 
abnormal end of operation when set. 

= no interrupt 

1 = interrupt on ABNORMAL end of operation only (end of tape, 

EOF mark, load point, parity error, lost data for mag. tape.) 

2) interrupt on an end of operation, whether normal 

3) or abnormal. 

(d) JUMP is any legitimate jump to the reject address. 

(e) Interrupt address is the address of a closed subroutine to which 
control goes when the specified interrupt occurs. 

(f) Reject address is a symbolic address to which control goes in the 
event of CIO rejecting the calling routine. In the event of a 
reject because a channel or a unit is not available the A register 
will contain zero. If the reject is due to an illegal function 
code, the A register will contain a non-zero quantity. For both 
types of rejects, the Q register will contain the status of the 
unit. 



16.2.3 (cont.l) 



(g) The mode designates the method of recording, and is given as 
an octal number. 

If no mode is designated, binary mode is assumed and density 
is under the control of the operator. 



Code 


Density 


Parity 


00 


Do not select a new mode 




40 


none 


even 


41 


none 


odd 


50 


low 


even 


51 


low 


odd 


60 


medium 


even 


61 


medium 


odd 


70 


high 


even 


71 


high 


odd 



(h) First Word Address (FWA) is the symbolic address of the first 
word in the input or output area. 

(i) Number of words (n) is the decimal number of words to be 
transmitted. 

(j) If no interrupt is specified, the normal return is written in 
location L+5. 

(k) On interrupt, before control is passed to the interrupt address, 
SCOPE saves A, Q and the 3 index registers. On completion of 
the interrupt subroutine, the programmer must return control to 
SCOPE, which will then restore the A, Q and Index registers to 
their original values. Note that no values obtained in the sub- 
routine can be returned to the main program in these registers. 



Example : 



Write at 556 bpi in BCD on a magnetic tape that has previously 
been defined as LUN 20, a 27 word block of data commencing at the symbolic 
address ORIGIN. 



After successfully initiating the write operation, jump to the 
symbolic address PROCESS and continue the execution of the program. 

In the event of an abnormal end of operation, go to the 
symbolic address ABANDON; and if the write request is rejected, jump to 
PAUSE. 



16.2.3 (cont.2) 



Answer: 



iOPERATION.MOOIFIERS ADDRESS FIELD 



] m i i^., ^ jmiA 



UJP PAUSE 

^.-_L.-i_..J.._jL_J i__i i i.Lll!iri_0. JL.X_i_i_i J_ 

4_rl_i_i_i i__uj. l-x^>1!!jc!j!zli1_Lj_ 



2.7 

__L_J L_i L i_J 1 1 1.*1 J 1 I i } j |__i...i__L 



A&AMbM 



CMP , , , _ x \ P0C0jSS, 



Use of interrupt facility (See also Section 21.3) 

If an interrupt address is specified, and the interrupt 
indicator is non zero, control transfers to the interrupt address at the 
end of the operation, or upon an abnormal condition interrupt. 

Before giving control to the interrupt address, SCOPE saves the 
contents of the A, Q and three index registers. It then enters the current 
condition and status of the unit in the A and Q registers respectively. 



C = Condition of unit 

= dynamic 

1 = static 

LF = Last function code (other than 13) given 
for the unit 

TCA - Terminating character address of data 

transmission contained in the Buffer 
Control Register. 



LS = Logical Status of the Unit 

00 = (a) if a status request, unit is static, 

channel is available 

(b) for reject return, hardware reject 

(c) for normal return, unit is dynamic 

01 = Channel is not available for any requests 

10 = previous operation is incomplete 

11 = previous operation is complete, but an 

interrupt request is being processed. 

LC = Last channel to which the unit was connected (or 
is still connected). 

R = Retention code (from standard 3200 tape label) 

= tape may be used for output 

1 = contents of tape should not be destroyed. 

STATUS See following chart. 



16.2.3 (cont.3) 



UNIT STATUS TABLE 



STATUS 
BIT 


MT 


CR 


CP 


PR 


PT 


TY 


00 


Ready- 


Ready 


Ready 


Ready 


Ready 


Ready 


01 


Busy 


Busy 


Busy 




Busy 


Busy 


02 


Write 
enable 












03 


File 
mark 


E0F 










04 


Load 
point 












05 


E0T 


Hopper 
empty 






Tape 

supply 

low 




06 


DENSITY 

00 = low 

01 = med. 
-in _ v, •; ~v> 












07 












08 


Lost data 


Fail to 
read 


Fail to 
feed 








09 


End of 
operation 












10 


Parity- 
error 


Reader 
error 


Compare 
error 






Parity 
error 


11 


Binary- 
mode 


Binary 
card 


Binary 
mode 




Binary 
mode 




12 




Stacker 
full or 
jammed 










13 














14 














15 














16 















NOTES : (a) Density is signified "by combinations of 2 bits 
bits 6 and 7 - a s shown. 

(b) Bits 13-16 are not used. 



16.2.3 (cont.4) 



Control transfers to the interrupt address by a return jump 
instruction established by SC0PE within the CIO routine. 

The interrupt address should therefore be an unconditional 
jump instruction to enable control to return to CIO after the interrupt 
has been processed 

e.g. INTERUPT UJP ** 

The programmer must transfer control to SC0PE from the 
interrupt routine by returning through linkage established by the 
return jump instruction 

e.g. INTRUPT UJP ** 



UJP, I INTRUPT 

Upon regaining control, SC0PE restores the A, Q, and Index, 
registers, and then returns control to the running program. 

Note that values placed in A, Q or the index registers in 
the Interrupt routine will be lost when the return to CIO is made. 
Values to be returned should therefore be stored before the transfer 
of control is carried out. 

An example of this appears on the following page. 



16.2.3 (cont.5) 

Example; 

Read 500 words from tape LUN .3 into a buffer commencing at 
BUFF a When the Operation has "been initiated, continue program execution. 
When the operation is complete, set location FLAG to a non-zero value» 
If the read request is rejected because of an illegal code, jump to 
ABANDON. If it is rejected due to channel or unit not being available, 
jump to PAUSE- 



Answer: 



HTJ 


CIO 


01 


3,2 


01 


REJ 


51 


BUFF 




500 




INTER 



LDA 



INTER 


UJP 




•*# 




ENA 




1111B 




5TA 




FLAG 




TTTD 




TUTITIIPTJ 
Xlt J. JiU.1 


REJ 


AZJ, 


EQ 


PAUSE 




UJP 




ABANDON 



16° 2. 4 Tape Control Operations 

The codes used in tape control calling sequence are 



04 


REWIND 


05 


UNLOAD 


06 


BACKSPACE 



07 SPACE FORWARD PAST ONE E0F MARK 

10 SPACE BACKWARDS PAST ONE E0F MARK 

11 WRITE E0F 

12 ERASE 

The calling sequence • 



Location 


L 


RTJ 


CIO 


L+1 




function code 


LUN, INTERRUPT INDICATOR 


L+2 




JUMP 


REJECT ADDRESS 


L+3 






INTERRUPT ADDRESS 


L+4 




NORMAL RETURN 





Note : (a) If no interrupt is requested, the normal return is written 
in Location L+3o 

(b) The notes for i/O control apply here alsoo 



16.2.4 (cont.) 

Examples : 

(i) To rewind logical unit 56 

RTJ CIO 

04 56 

UJP *-2 

normal return 

(ii) To write an end-of-file on LUN 20 

RTJ CIO 
11 20 
UJP *-2 
normal return 

(iii) To space forward past an end-of-file mark on LUN 17 

RTJ CIO 
07 17 
UJP *-2 
normal return 

Notes ; (i) The direction of tape motion following a BACKSPACE request 
depends upon whether the last operation was a READ or a 
READ BACKWARDS operation - 

(a) If the last operation was a READ operation, the 
tape will move backwards. 

(b) If it was a READ BACKWARDS operation, the tape 
will move forward one record. 

Other motion requests indicate the true direction of the 
tape and are not affected by READ BACKWARDS. 

(ii) Tape control operations require the channel only during 

initiation of the function. They do not cause the channel 
to be busy while the function is carried out, However s if 
an interrupt at the end of operation is requested, CIO 
considers the channel to be busy until the interrupt occurs 



16.2.5 Unit Status Requests 

For codes returned as status replies, see table on (cont. 3) of 
section 16.2.3. 

The calling sequence : 

Location L RTJ CIO 

L+1 13 LUN, Dynamic flag 

L+2 N0RML RETURN 

NOTES : (a) The function code in L+1 is always 13. 

(b) SC0PE provides the status in the Q register, and the 
current condition in the A register (A is negative 
if the unit is static, positive if it is dynamic). 

(0) Dynamic flag : 

If this is non-zero, the unit is interrogated for 
status unconditionally. (Status is given if unit is 



16.2.5 (cont.) 



busy or not). If the flag is aero: 

(i) If it is not busy, the status of the last 
completed operation is given. 

(ii) If the unit is busy, the current status is 
returned. 



16.2.6 Format Selection 



The codes used in this sequence are - 

1 = BCD 

2 = BINARY 

3 = LOW 

4 - MEDIUM 

5 = HIGH 

The calling sequence: 

RTJ CIO 

U LUN, FORMAT CODE (as above) 

JUMP REJECT ADDRESS 

NORMAL RETURN 



16.2.7 Page Control of the Line Printer 

The first character of the output buffer is used to 
position the paper prior to and after printing. This is accomplished 
by the following sequence of events. 

(a) The first character is removed and replaced with 
a blank. 

(b) The corresponding function code is found and 
selected. 

(c) The output buffer is printed. 



16.2.7 (cont.l) 



The character codes used in Page Control are: 



User Character 
1 
2 
3 
4 
5 
6 
7 
8 
A 
B 
C 
D 
E 
F 
G 
H 

blank 




other 



Action Before Print 

Skip to channel 8 

Skip to channel 7 

Skip to channel 6 

Skip to channel 5 

Skip to channel 4 

Skip to channel 3 

Skip to channel 2 

Skip to channel 1 

No space 

No space 

No space 

No space 

No space 

No space 

No space 

No space 

No space 

Space 1 

Space 2 

No space 

No space 



Action After Print 
Space 1 line 
Space 1 line 
Space 1 line 
Space 1 line 
Space 1 line 
Space 1 line 
Space 1 line 
Space 1 line 
Skip to channel 8 
Skip to channel 7 
Skip to channel 6 
Skip to channel 5 
Skip to channel 4 
Skip to channel 3 
Skip to channel 2 
Skip to channel 1 
Space 1 
Space 1 

upuC€ x 

No space 

Skip to channel 1 



Examples: 

(a) To advance paper to the top of the new page 

RTJ CI0 

02 61 

RTJ REJX 

00 PAGE 

00 1 



PAGE BCD 1 , 1 



16.2.7 (cont.2) 



(b) To advance one line 



RTJ 


CI0 


02 


61 


RTJ 


REJX 


00 


DS 


00 


1 



DS BCD 1 , 



Note: If unit 61 is assigned to tape by the operator and the 
tape is listed later or is listed off-line, trouble may 
develop because of the short print record (4 chars). 
Therefore it is recommended that all records be at least 
24 characters so that they won't be considered 'noise' 
records by tape input routines. 



STUDENT NOTES 



SCOPE CONTROL CARDS 

17.1 INTRODUCTION 

17.2 SEQUENCE CARD 

17.3 JOB CARD 

17.4 ENDSCOPE STATEMENT 

17.5 ENDREEL STATEMENT 

17.6 CTO STATEMENT 

17.7 REWIND STATEMENT 

17.8 UNLOAD STATEMENT 

17.9 EQUIP STATEMENT 

17.9.1 Hardware Definition 

17.9.2 Equating Logical Units 

17.9.3 Physical Unit Assignment 

17.10 TRANSFER STATEMENT 

17.11 LOAD STATEMENT 



17.12 COMPASS LIBRARY CALLING STATEMENT 



17.13 RUN STATEMENT 



Chapter \VA 



17.14 DIAGRAMMATIC DECK 



17.1 INTRODUCTION 



SC0PE control cards have a 7,9 punch in column one. 
There must be no other punchings in column 1 . 

Columns 2 through 80 contain Hollerith information or 
blanks. The first information on each card must be the statement 
name, followed by a comma. 

7 
e.g. LBM, 



9#B. 



1J.2 SEQUENCE CARD 






The sequence statement assigns a number (j) to the job which it 
precedes, j must lie "between 1 and 999* This card is normally supplied 
by the operating staff . 

An E0F must precede each SEQUENCE statement except the first on 
input . 

When a SEQUENCE statement is detected, the statement is typed out 
on the console typewriter, and listed on the standard output unit. SC0PE 
writes an E0F on the standard output tape (when tape is being used) , and 
on the punch tape (if assigned), and releases all programmer units held 
from the last job. 

SC0PE also closes off the last job's accounting, and opens a new 
accounting record for the 'hew job. 

If the sequence card is not followed by a J0B card, the job is 
terminated, and SCpPE searches forward until it finds an E0F. The 
following statement must be a SEQUENCE, ENDEEEL or ENDSC0PE. If it is a 
SEQUENCE followed by a J0B card, SC0PE proceeds normally. 

After SEQUENCE is read, SC0PE pauses for comments from operator to 
be typed in on the console typewriter. These enable the operator to spec- 
ify the services for program execution (e.g. special EQUIP statements;.. 
This is the only opportunity the operator has to enter such statements. 

Note: If the column following "j" contains a comma, comments may 
follow. 



Example : 



^SEQUENCE ,027, COMMENT 
9 



17.3 JOB CARD 



I 18CHI0K OPEBMtOHJIWHfSS 


mkbs ran 




Wte>±*$J& ,.„..; 




,:.,::. 


I. , . ... . • ,' U : . ....,...„...-! 


ii:imuu»iEi«iiaiai 


JtUii»i»!"J»i»J>^ 



The symbols used in the statement are interpreted as follows: 

c charge number, 0-8 characters 

i programmer identification, 0-4 characters 

t time limit in minutes for the entire job, 
including all operator setting up, idle 
time , etc . 

NS indicates a single non stacked job. If 
NS is specified, NP is implied also. 

All system units are rewound and unloaded, 
making all I/O units available to the 
programmer. 

UP Suppresses system I/O protection for 
stacked job. 

ND Suppresses the normal post execution dump 
in octal of the non system part of memory 
should abnormal termination of the job 
occur. 

The c, i, and t fields are mandatory. If a field is blank, the 
comma showing this must appear. 

e.g. ?J0B,c,,t 

The job card is written on the standard output unit, and also on 
the CT0 (comments to operator) if the job is part of a stack. It must be 
immediately preceded by a SEQUENCE card or the run will be terminated. 



17.4 EHDSGgiPE STATEMENT 



! mmu | !e?EMII0XJM}IFSi»S__«8S«SSJiflB 
IZEJ4DSC0PE ~~ ~2Z1 1.,...! J il^l 



This indicates that a SC0PE run is to he terminated. On the 
standard input unit, it should follow the E0F terminating the last in 
the stack. This card is normally supplied by the operations staff . 

The card is listed on the CT0 unit and on 0UT, and the standard 
input unit is unloaded, if magnetic tape. 

The library tape is rewound, and the accounting file is closed 
off. 



A double E0F and one BCD word, consisting of ER AA are written 
on the standard output tape (when tape is used), which is then unloaded. 
If the punch tape is assigned, it is treated in the same way. 



When all action is completed, the computer stops, 



17 ■ 5 ENDREEL STATEMENT 



U8Mi!M mmm.mmnm mm$ heio 

lEMDREEL 



The statement terminates a reel of magnetic tape 
containing a job stack. (Normally it will be placed in a card 
job stack by the operations staff during card to tape operations 
preparing a tape for use as a standard input tape.) 

SCjZfPE requires an E0F both immediately before and after 
ENDREEL. 



When the statement is detected, SC0PE prints a message on 
the CT0 unit requesting the operator to mount the next reel of 
input, and halts the computer until the operator takes the action. 



17-6 CT0 STATEMENT 



IflUTISH | «roO00 IFM$ MMESS »M 



The programmer may proride instruction® or messages to 
the operator. The message is punched in Hollerith. 

Examples ; JcT0, PLEASE UNLOAD TAPE TW0. 

7 



?CT0,SNAP DUMPS WILL 0CCUR. 

7 

The message is printed on the CT0, and also listed on 
0UT. CTp cards may "be placed in the deck where SC0PE control 
cards may appear, except as follows: 

(i) Before or after SEQUENCE, ENDSC0PE 
or ENDREEL. 

(ii) After C0MPASS or F0RTRAN. 

(iii) Between RUN and last data card. 



17.7 REWIND STATEMENT 



LCH.rit fF'Ul 


m,mm\m 


HfiBHSS HUB 




^JHWD,^^ 


: -'» t y 


"■""..'ii'l.i ■■ : t • 






:.,.,., ■■_ L „ u; ...:,_.,i. 


... ,..,„„,,, i ^„^,,„,,. il : 


!«i»i !'i««m 



The magnetic tapes specified are rewound to load point. 
U is the logical unit number, and may be 1 through 57 or 63. The 
statement is copied onto the standard output unit, and on the 
GT0 unit. 



If U is not 1-57,63 or not a magnetic tape unit, the 
request is ignored for that unit, but the rest of the units on 
the card are processed. 

7 
Example: 'REWIND, 21 ,42,01 ,55 



17.8 UNLOAD STATEMENT 



lOWTISii ! IlKltfiOK.IMBIFiESS MBStESS FIELD 



I M i 



The Logical units, U (l-57)> may be unloaded by the 
programmer. The statement acts similarly to the REWIND, except 
that the unit is unloaded after rewinding. 

Example : LjNL0AD,21 ,42,01 ,55 



17.9 EQUIP. STATEMENTS 



itn'm %p!wm mmm mm$ fifti 




$£QUiP t X^J,i)(r<U* • -. • •: -«*c ^ ,....., , 




! ; ,:,:^ , j .[ , ._._•.:.,,.,__..,,.,'.■(.., i,,,^,, „£,« : t-^J,-.^;.. ^-> : 


!<:.«)»;.': 



Where X = the logical unit number 

d = a declaration about the unit. 

1 7 « 9 ■ 1 Hardware def ini t ion 

^EQUIP,X 1 =hh 1 ,X 2 =hh 2 , etc . 

hh is a hardware type mnemonic 
X is a L.U.N. 

Mnemonic Type 

MT Magnetic Tape 

CR Card Reader 

PR Printer 

CP Card Punch 

TY Console typewriter 

PT Paper tape station 

DP Disk Pack 

SC0PE assigns the LUN to an available equipment of the 
specified type. 

If no equipment is available, a diagnostic is given, and 
the job is terminated. 

n 

Examples : 'EQUIP , 51 =MT 

7 



LsQUIP , 51 =MT , 43=PR , 26=PT 



1 7»9>2 Equating Logical Units 

Logical units are equated by this statement 
^EQUIP^-Xg 

A system unit (57-63) may not be specified on the left 
hand side of the statement. If it is, the job is terminated. 

Examples : 7 EQirI p >43=6 o is permissable 
but IeqUIP, 60-43 is illegal 

7 



^EQUIP,22=MT ) 

^ ^ Here both LUNS 22 and 23 will 



J„ -. T o:s ) reference the same magnetic tape. 



17«9»3 Physical Unit Assignment 

^EQun>,x=hhc c E e u uu 

c = channel number (0-7) > prefixed by C 

e = equipment number (controller), prefixed by E 

uu = unit number (device), prefixed by U 

Example t 

^EQUIP , 15=MTCOE2U03 

It is possible to omit some parameters in the statement. 
The following table sets out permissable combinations. 



hh 


C 
c 


E 
e 


U 
uu 


X 








X 


X 






X 


X 


X 




X 


X 


X 


X 




X 


X 


X 




X 


X 





Use of non-existant c, e or uu, will cause a diagnostic 
and termination of the job. 



Example : 



Answer : 



Assign PUN (LUN 15) and LGO (Load and Go, 
56) to the physical unit on channel 0, 
Equipment 1., and unit 7. 



'EQUIP, 15=MTC0E1U07 



JeQUIP, 56=15 



or ^EQUIP,15=MTC0E1U07, 56=15 



17.10 TRANSFER STATEMENT 



i 19MTSM : lgp£RATIOK MOOiFfEBS HBBBESS F16L8 






U = Magnetic Tape Unit, 
defined as 1-56, 
or undefined. 

Description : SC0PE transfers all the information following 
the XPER statement from the Standard input 
unit (INP) to the magnetic tape LOT U, 
until another SC0PE statement is encountered. 

The records must be binary records and they are 
written on LUN U in odd parity. When the next 
SCOPE statement is found, an EOF is written on the 
tape, and SCOPE then backspaces over the EOF. 

Uses ; 

(i) Programmer binary data cards* may be transferred 
from INP to a magnetic tape unit. A 
card with a 7 puncn in column 1 is suffic- 
ient to terminate the XFER operation. 

(ii) Binary object subprograms may similarly be 
stored on another magnetic tape for future 
use. The unit must be rewound before the 
L0AD operation if it is a programmer or 
scratch unit. 



Example : 



L(FER,03 



* 
Binary Data 



7 
9 

7 
The data is written on unit 3> when the ' card 

is found, SC0PE writes E0F and backspaces over 

it. 



*Data cards must be binary data cards where 

column 1 has a q punch plus at least one punch 

in the + - 1 2 or 3 position. The data used is 
usually a subprogram binary deck. 



17.11 LOAD STATEMENT 






(U , U~ and U^ are Mag. tape units, previously 
defined by EQUIP statements as LUN 1-56. If 
omitted, SC0PE will try to load from the INP 
unit 60) 

Description : Not more than 3 units can be specified, and the 
loading is done in the order indicated. Unit U 
will be loaded until an E0F is found. Then U is 
loaded until E0F, and finally U, is loaded. If 
there are 3 parts on one unit, each terminated by 
an E0F, the unit number can be repeated: 

^L0AD,23,23,23 

When the units designated have been loaded, the 
Standard input unit is examined to see if binary 
object subprograms follow the L0AD card. 

NOTE: If the LG0 unit is being used, the L0AD 
card must be of the form: 

^L0AD,56 

The L0AD statement calls the loader to load binary 
subprograms into memory from programmer units, 
scratch units, LG0 or INP. Only one L0AD statement 
may appear in a run. 

If 56 (LG0) is specified, it will first be rewound 
by SC0PE. Other units must be rewound by rewind 
statements before loading is attempted. 



Example : 



^L0AD,56,3,25 

LG0 is rewound by SC0PE and loaded until E0F is 
found. Units 3 and 25 are then loaded to E0F 
marks . 

NOTE : If only binary object programs are to be 

loaded (on INP), no L0AD card is necessary. 

Example : 

Lt0b, 11121156, 404, 2 

7 

Binary object deck 

^M,1 



II 



17.12 COMPASS LIBRARY GALLING STATEMENT 









Description ; The COMPASS library program is called in and 

loaded into memory, so that source programs in 
COMPASS may he assembled and executed. 

The parameter letters are free field, and may 
thus appear in any order. Each parameter must 
start with the character shown. 

I = INPUT (the source subprogram input unit) 

Specified as I = u, when u = LUN, when a source 
subprogram is to be loaded from a unit other than INP. 

If the I parameter is absent, input is assumed to be 
from unit 60 - INP. 

Example ; 

^EQUIP,MT-23 



J#MPASS,I=23,ete. 



PUNCH-UNIT 



Specified as P = u, where the punch unit is to be 
assigned to an output device. 

If P only occurs, punching is on the binary punch 
unit (PUN) - unit 62. 

If the parameter is absent, no binary output is 
produced. 



X = EXECUTE (X = u) 



Assigns the Load-Go unit (LG$) to logical unit U, 
which must have been previously defined as a MT 
unit. 

If absent, no I&0 tape will be produced, and the 
program will be assembled and listed only. 

If only X appears, output will be put on the 
standard LG-0 unit (56). 

L = LIST OPTION (L = u) 

Output is listed on unit u, which must have been 
previously defined. 

If L only appears, listing will be done on the OUT 
unit (61). 

If the parameter is absent, no listing of the 
program is given. 



17.12 (cont.) 



R - REFERENCE 

■ 

When R appears, a symbol reference list is produced 
on the assembly listing. This is an alphabetic list 
of all symbols used in the program, with the address, 
or the value, of the symbol shown. The symbol list 
appears immediately following the listing of the 
assembled program. 



Example : 



A 


77777 




F0001 3 


ABNORMAL 




EXTERNAL 


P00001 


B 


00020 




P0001 3 


JOHN 


P00002 




P0001 1 


NAME 


P0001 1 




P0001 3 


X 


00057 




P0001 2 



P0001 3 



SYMBOLS NOT REFERENCED 
ABLE P0001 3 



LOC P00007 START P00000 



Note that X is referenced at two different locations in 
the program (12 and 13). 

Character addresses are shown as follows : 



CAN 
BILL 



P00166 
P00156 1 



17-Bit non-relocatable symbols are shown 



T0M 



00076 2 



17.13 RUN STATEMENT 
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t = execution time in minutes 

May "be in the range through $$$. 

The time is not used by SC0PE, but is entered in the 
installation accounting file. 

If not specified, maximum time is assumed. 
NM = NO MEMORY MAP 

If NM appears, it suppresses the memory map that would 
otherwise be written on 0UT, before program is executed. 
(All absolute memory allocations are given in the map). 



Examples : 



(i) ?RUN,2 

(the execution time is assumed to be two minutes. 
The memory map will appear on 0UT.) 

(ii) ^RM,727,NM 

(the execution time is assumed to be 727 minutes, 
and no memory map will appear on OUT). 

(iii) ?RUN 

(maximum execution time is assumed. Map will be 
printed) . 



(iv) LtUN,,NM 



(maximum execution time assumed, and no map will 
be listed on 0UT^. 



17.14 DIAGRAMMATIC DECK 



^SEQUENCE, 001 

7 J0B,32OO,ST0RMA,1O 
9 

7 EQUIP,56=MT 
7 FORTRAN, (Parameters) 
PROGRAM MAIN 



GALL START 



END 



K F0RTRAN Main Program 



FINIS 



7 C0MPASS , (Parameters) 
9 

IDENT TW0 
ENTRY START 
START UJP ** 



END 
FINIS 



1 



> C0MPASS Subprogram 



L0AD,56 

,RUN,5 



data deck 



77 (End-of-File Card) 

oo 



.ENDSC0PE 



77 
88 
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18.1 0CTAL CORRECTION CARDS 

7 

O0CC, location, octal correction, , octal correction. 

7 

Description : Octal corrections may be made to binary object 

subprograms after loading, using this instruction. 

The parameters are free field. 

If a period is used to terminate the card, comments 
may follow it. 

The statement may be used to - 

(i) define corrections 

(ii) enter corrections 

(iii) enter additions to a subprogram by 
establishing a program extension 
area after the subprogram area. 



1 8. 1 . 1 Location Symbols 
(i) (Program name) k 



Corrections on this card are loaded beginning with relative 
address "k" in the named subprogram. The subprogram name 
must appear in parentheses. 

Examples : 

LfcC, (TEST) 15,01000000 

^CC,(BITFFIN)107,20 

Example of use : 

IDENT TW0 
ENTRY START 
START UJP ** 



10 ENA 20B 

END 
To change ENA 20B to ENA 30B 
^JCC,(TW0)1 0,14600030 

(ii) Data Area Corrections 

Dk 

Corrections are loaded beginning with location "k" in the 
Data area. 



Example : ^CC , D70 , 1 4000000 



18.1.1 (cont.) 



(iii) Program Extension Area 
Xk 

(a) First occurrence: 

Defines a program extension area of length k words. 
Corrections on this card are ignored. 

(b) Subsequent occurrences: 

Corrections are loaded "beginning at location k 
of the program extension area. 

Example : L#CC,X30 

LzfCC,X3, 14000010, 14000250 

(iv) Continuation Cards 
+k 

Increment k locations from the last location plus 1 , corrected 
"by the previous 0CC card, k must be octal. 

Lztec, (test) 136,00000100 
Jzfcc, +5,14000600 

Location 1 36 in Subprogram TEST, and location 144 in TEST 
are changed. 



18.1.2 Octal Corrections 

(i) Corrections may be of up to 8 digits, and are in the form of 
machine instructions. 

(ii) Each correction is separated from the preceding correction by 
a comma. 

(iii) Leading zeros may be omitted. Each value is stored right 
justified with zero fill, in successive computer words. 

(iv) Locations may be omitted for correction by using commas to 
indicate the omissions - 

e.g. L*CC,(TEST)10, 140,, 162,, 10014100 

Location 10 is altered to 140 

11 is unchanged 

12 is altered to 1 62 

1 3 is unchanged 

14 is altered to 10014100 



18. 1.3 Relocation Factors 

(i) none given - the quantity specified is absolute, 
(ii) (Subprogram name) - the address field of the correction is 



18.1.3 (cont.) 



relative to the subprogram's first location. 

(iii) Data area - D 

Relocate the word address portion of the 
Octal correction relative to the DATA area. 

(iv) Common Area - C 

Relocate the word address portion of the 
Octal correction relative to the C0MM0N 
area. 

(v) Program Extension Area - X 

Relocate relative to Prog. Ext. Area. 

(vi) Last subprogram area referred to - * 

Relocate relative to the last subprogram 
named in this or a preceding 0CC or SNAP 
statement . 

Example: LzfcC,(TW0)3O,2OOOOO4O(TW0) 

Correction made to location 30 in subprogram 
TW0, with the address part of the correction 
relocated by the factor by which TW0 itself 
is relocated. 

(i.e., if subprogram TW0 itself is relocated 
by 1000, the actual correction loaded would 
be 2001040). 

Note: The above example could also have 
been written: 



,000 , (TW0) 30 , 20000040* 



9' 



1 8 . 1 . 4 Error Indicators 

Errors in 0CC cards prevent execution of the program. 

If the extension area is incorrectly defined, the following message 
is printed on 0UT: 

***Xnnn 

where nnn is the 3-digit octal length of the 
SC0PE defined extension area. 

The format for all other errors is: 

*mn COL nn 

where mn = error mnemonic 

nn = column number on the card. 



18.1.4 (cont.) 



The following table sets out the error mnemonics used. 



Mnemonic 


Meaning 


FN 


Program name 


BS 


Common or data storage is 
undefined and referenced 


AD 


Address or location field "begins 
with an illegal character 


8F 


Octal field contains a non- 
octal character 


XA 


Program extension area error 


WR 


Wrap around of location field 
address - exceeds core size 


AN 


Antecedent reference to a 
program or loading address 


RL 


Relocation factor error 



18.2 SNAP DUMPS 



SC0PE provides selective memory dumps during execution, using this 
statement . 

ZsNAP, (Parameters) 

The statement must appear after the program is loaded and before 
the RTO card is encountered. 

The dump is carried out by the library routine SNAPSHOT, which must 
be defined in the program as an external , (if it is not declared 
as external, the routine is not loaded into storage at load time. 
A diagnostic of this is given on the 0UT listing as fellows: 

*■■** N0SD 

RUN ABORTED 

The job is terminated.) 

Snap statement parameters define 

(a) Where the dump is to be taken 

i.e. when execution reaches a predetermined 
point, the dump is taken. 

(b) The area to be dumped. 

(c) The format of the dump. 

The SNAP statement is of the following form: 

7 

-SNAP, location, beginning address, ending address, mode, 
identification, comments . 

Each parameter is separated by commas. 

Program names are always enclosed in parentheses. 



18.2.1 Errors 

If there is an error in any subfield, the following diagnostic is 
r en. 

*mn , COL nn 

inn « error mnemonic 

nn = the card column number, in which the 
error occurs. 

The error mnemonics are set out in the table on the following page. 



18.2.1 (cont.) 



Mnemonic 



PN 



BS 



AD 



Meaning 
Program name 

Common or data storage is 
undefined 



8P 



Address or location field begins 
with illegal character 



Octal field contains a non-octal 
character 



XA 



WR 



IM 



Program extension area is 
undefined or too small 



Location field address wrap 
around - exceeds core size 



Overflow of memory will recur if 
this SNAP is loaded 



Illegal mode 



greater than LWA 



TOA 



Fnen an error occurs, the SNAP statement is ignored, and execution 
continues as if no SNAP statement had been given. 



18.2.2 Location 

(i) (Subprogram name) k 

Replace location k in the subprogram with a RTJ to SNAP 
calling sequence. 

(ii) Program extension area - Xk 

Replace location k in the P. EXT area by a RTJ to SNAP 
calling sequence. 

(iii) Data area - Dk 

Replace statement k in the DATA area by a RTJ to the 
SNAP calling sequence. 



1 8.2.3 First and Last Word Addresses 

The ending address must always be greater than the beginning 
address, or the SNAP statement is ignored. 

The address can be 

(i) Dk - dump begins or ends with word k in the DATA area. 

(ii) Ck - dump begins or ends with word k in the C0MH0N area. 



18.2.3 (cont.) 



(iii) Xk - dump begins or ends with word k in the Program 
Extension Area, 

(iv) (Subprogram name) k - dump begins or ends with the 
location k in the specified subprogram. 

(v) *k - dump begins with the location k in the last named 
subprogram in a preceding 0CC or SNAP statement. 



18.2.4 Mode 



The dump may be in one of 3 formats, and may include the Register 
file or not, as specified. 

= octal 

C = 6-Bit Characters 

F = Floating point 

If the register file is to be included, R is used. Thus 0R 
will give the dump printed out in 0CTAL, plus the register file 
contents. 



18.2.5 Identification 

to 4 BCD characters will be printed out on the SNAP output to 
identify the dump. (Used if several dumps are to be made). 



1 8.2.6 Note 

If the location specified is in a loop, the contents of the area 
will be dumped out each time the location is encountered in the 
loop. 



18.2.7 Example 

Dump after the execution of the 5th instruction of subprogram SUB1 
(assuming the first location of the subprogram is the entry point 
and is entered by a RTJ). Dump from location 441 in SUB1 to location 
465 in SUB1 in OCTAL, with the Register File also, and identify the 
dump as 0NE. 

Answer: 7 S NAP, (SUB1)6,*441 ,*465 ,0R,0NE 

*441 could also be written (SUB1)441 



18.2.8 Rules for Using SNAP 

(1) DON'T specify SNAP for an instruction using more than one word, 

e.g. SRCE 
SRCN 
MOVE 

(2) DON'T SNAP jumps or tests, e.g., AQJ,EQ. - The jumps will 

not he executed correctly. 

(3) DON'T SNAP indirectly addressed instructions. 

(4) DON'T SNAP instructions which will he modified hy program 

execution. 

(5) AVOID using SNAP instruction in a loop. 

(6) DON'T modify the location at which the SNAP occurs hy an 

0CC statement. 

(7) DON'T specify SNAP for the following instructions: 



MTH 

SSH 

CPR 

CON 

SEL 

EXS 

INS 

INTS 

PAUS 



(8) DON'T specify SNAP for any SKIP Instruction 

e.g. ISI, ASE, QSG, etc. 

(9) DON'T specify SNA? for INPUT/OUTPUT instructions. 



18.3 OTHER DEBUGGING AIDS 

18. 3« 1 Memory Map 

The programmer may secure a map of memory allocated 
to a loaded program at the time the run card is encountered. This 
map may be suppressed by a parameter of the RUN control statement 

(mi). 

The map contains the following information: 

(1) Absolute address of the first location in each 
subprogram loaded. 

(2) All entry point symbols and their absolute 
addresses. 

(3) The absolute addresses of the first and last 
locations in the common area. 

(4) The absolute address of the first location in the 
data area. 

(5) The absolute address of the first location in the 
program extension area. 



18.3.2 Abnormal Termination Dump 

If a job is terminated abnormally, a post execution 
dump of all the non system part of memory is written on the 
standard output unit, unless the programmer has specified in the 
job card that it be suppressed (ND parameter) . 

The dump consists of the console conditions, the 
register file, and all the non-system part of memory. 

Should the contents of words making up a line of 
print be exactly the same as both the last word on the preceding 
line, and the first word on the following line, the line is not 
printed, and the word "GAP" appears instead. 

e.g. If all the locations between 10010 and 1001 7 are 
the same as both 10007 and 10020, the line will 
not be printed, and GAP will indicate the omission. 



18.4 C0MPASS ERROR CODES 

A Format error in address field. 

C Attempt to assemble information into C0MM0N. 

(instructions are processed as if a PRG was encountered.) 



Doubly defined symbol. 

(The first time the symbol is used it is legal, and no 
flag is issued. Subsequent errors are flagged, and the 
instructions using the symbol are assembled as if no 
symbol occurred.) 



Full symbol table. 

(All F flagged symbols are undefined, and reference to 
them in address fields of other instructions will 
produce U errors . ) 



L Location field error. 

M Modifier error. 

Operation code error. (The field is assembled as zeros.) 

U Undefined symbol. 

T Truncation error. 

(A symbol defined as a 17-bit character address is used 
in a subfield of only 15 bits. The 2 least significant 
bits are lost in truncation, and the flag indicates this 
loss.) 
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19. C0MPASS ASSEMBLY OF CONSTANTS 

Constants may be 

(i) stated as octal, decimal or character in the source 
language . 

(ii) single, double or variable precision. 

(iii) fixed or floating point format. 

(iv) placed into bit positions of variable length fields. 

19»1 0CTAL CONSTANT PSEUDO INSTRUCTIONS 
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Description : The instruction expresses constants as signed or unsigned 
octal constants. The octal integer may consist of 8 or 

less digits. 

As many constants as can be contained on a card may be 
expressed in the address field, separated by commas. 
No blanks may appear between constants. The field 
terminates at the first blank or at Column 73. 

The octal constants are assembled, right justified, in 
consecutive locations. The symbol in the location field 
is the 15 bit word address of the first constant in the 
field. 



Example i 



CVTABLE 0CT 
CVTABLE 



-17,32,12345670,5742,-361 



77777760 


00000032 


12 3 4 5 6 7 


00005742 


7 7 7 7 7 4 16 



An optional binary scale factor may be stated by suffixing 

the constants by B, and expressing the scale factor as a 

signed or unsigned decimal integer" of not more than 2 digits. 

The magnitude of the constant after scaling must be less than 

24 

The scaling factor is used to save space in coding 



2 
e.g 



CVTABLE 
CVTABLE 



0CT 
0CT 

Examples : (i) CVTABLE 0CT 72B2 

72 - 111 010 in binary 



200000 
2B15 



could be written as 



= 111 010 00 scaled by 2 (shift binary point 

2 places right) 
=11 101 000 regrouped 



= 3 



(CVTABLE) = 0000 0350 



19.1 (cont.) 



(ii) L0C 0CT 36B3,4B12,270B-2 
36 - 011 110 2 

« 011 110 000 (scaled) 
-3 60 8 

4 * 100 o 



100 000 000 000 000 2 (scaled) 



40000 



8 



270 - 010 111 000 r 



010 111 (scaled - 2) 
56 Q 



L0C 



0000 0360 



0000 4000 



0000 0056 



(iii) NUMBER 0CT 2416, 311B16,3417B-8, -372 



NUMBER 



0000 2416 


6220 0000 


0000 0007 


7777 7405 



Note : In negative scaling, digits are discarded from the right. 

If the number after scaling is greater than 2^4-1, the field 
is set to zero and the A flag is set. 

Example ; 0CT 6666B20 

Assembled as A= 00000000 



19.2 DECIMAL CONSTANTS, FIXED POINT 



! isKMiin mmm mmm mtm mm 
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Description ; 



Example ; 



The instruction expresses constants as single precision 

fixed point binary constants. The constant may consist of 

a sign, and not more than 7 digits, with a magnitude of 

23 
less than 2 . The symbol in the location field is the 

address of the first constant in the field. The address 

field may contain as many constants separated by commas 

as the card may contain. The field terminates at first 

blank or Column 73* 



L0C 
L0C 



DEC 



1,82,-38 





















1 














1 


2 


2 


7 


7 


7 


7 


7 7 


3 


1 



< 1 8 ' 1 10> 
(122 8 - 82 ) 



(-46 c 



•38 10 ) 



Scaling Factors : 



Both decimal and/or binary scaling factors may be stated 

by suffixing the constant with D and/or B, and expressing 

the scale factor as signed or unsigned decimal integers. 

The magnitude of the constant after scaling must be less 

2^ 
than 2 J . 



Steps in the conversion ; 

(i) Decimal integer is converted to binary, 

23 
The result must be less than 2 . 

Example ; 36 1Q = 44 Q 

- 100 100 

(ii) Binary integer is multiplied or divided by 10 , 
where d is the scaling factor. 

23 
The result must be less than 2 

Example : 36 Q D2 = 36 x 100 

- 44 8 X 144 8 

= 100100 x 001100100 

- 111000 x 010 000 

- 7020 8 



(iii) Shift the result the number of bits specified by 
the binary scaling factor. 

Negative factor - RIGHT shift 

Positive factor - LEFT shift 



Example ; 



36 1Q D2 B2 

36 1Q D2 = 111000010000 



- 11100001000000 - 34100 



8 



19 . 3 DOUBLE PRECISION AND/OR FLOATING POINT CONSTANTS 






Description ; Decimal values may be stored as double precision fixed 

point constants, or as floating point constants. Either 
format requires 48 bits for storage (2 consecutive words). 
Up to 14 decimal digits may be specified, and the value 
of the expression must be less than 247. 

Decimal and binary scaling factors may be used, as in the 
DEC instruction. 

The signed 48-bit result is stored in two consecutive 
computer words. 



Example 1 SYM.TAG DECD 

SYM.TAG 



32»64D2B4 



00 00 


00 


00 


00 00 


00 


40 


00 00 


00 


00 


00 31 


00 


00 



64 10 - 100 8 

D 2 = 10 2 = 100 = 144 8 
100 Q x 144 8 = 1 44 00 8 

= 001100100000000 

» 11001000 000 000 000 

s u 0000 



Floating Point Constants ? 

1. Floating point constants contain a decimal point. 
Examples: 300. 246 

2.040117321 

.111 
1765122.1 

2. They are stored in two consecutive 24 bit words as a 12 bit 
characteristic (exponent) and a 36-bit mantissa (coefficient). 



WORD 1 
WORD 2 



BIASED EXP 



COEFF 



COEFF 



3. A floating point constant may contain not more than 14 decimal 
digits and a decimal point. 

4. Binary scaling is not permitted, but decimal scaling is. 

5. The result after scaling must not exceed the capacity of the 

/ ,.+308 -v 
hardware (,10- ; 

Example : SYM.TAG DECD 17643-463214 

17643. 46 3214 10 

= 42353.3551246 8 

= .423533551246 8 x 2 15 



2017 J 4235 
3355 1246 



19.4 BCD CONSTANTS 









Description: Characters are assembled for store into consecutive computer 
words as 6-bit BCD character codes, in addressable character 
positions. The code used is internal BCD. 

The decimal integer n * the number of words to be used. 

The maximum number of characters to be stored would be 4 x n. 

The instruction reserves "n" words of storage, and any 
character positions not filled from the instruction are 
filled with blanks. 

Characters specified in excess of (4 x n) are treated as 
comments. 

The symbol in the location field is the 15-bit address 
of the first word. 



Example : (i) ERR0RMSG BCD 



ERR0RMSG 



3,1/0 ERR0R 



I 


/ 





60 


E 


R 


R 


t 


R 


60 


60 


60 



3 words reserved, 
therefore the maximum 
number of characters is 
12. Here only 9 appear 
before the end of message, 
so all are included. 



(ii) ERR0RMSG BCD 



uRR^RMSG 



2,1/0 ERR0R 



T 


/ 
/ 




60 


E 


R 


R 


* 



2 words reserved, 
therefore the maximum 
number of characters is 8. 
Here 9 appear, therefore 
the last one is treated as 
a comment and discarded. 



19.5 BCD CHARACTER CONSTANTS 





U18N 


■ . • .; -, •:,-•■, 










■ BCD C n C.C ■ - - 
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Description : Characters are assembled into consecutive character positions. 

n signifies the number of character positions to be reserved, 

15 
and must be an integer less than 2 . Characters in excess 

of n are treated as comments; positions reserved but not 

used are filled with blanks. 

The symbol in the location field is the 17-bit address of 
the first character. 



Examples ; 



Storage 

If the line of coding before BSS,C assigns character storage, 
the character string begins in the next available character 
position. If not, it begins with the first character 
position in the first available word. 

If the number of characters specified does not exactly fill 
the last word, the rest of the word is zero filled. However, 
if the next instruction in the program which consumes space 
is a BCD.C instruction, it will fill up the remaining 
character positions in the last word. 



(i) 



MSG 



BCD,C 



9, TEST PR0G 



MSG 



(ii) 



MSG 



(iii) 



MSG 



MSG 



T 


E 


S 


T 


60 


P 


R 


J* 


G 











MSG 




BCD,C 


T 


E 


S 


T 


60 


P 









BCD,C 
BCD,C 



T 


E 


S 


T 


60 


P 


R 


t 


G 


60 


E 


N 


D 


60 









6, TEST PR0G 



10, TEST PR0G 
4, END 



(Note: 60 » blank read 

after PR0G above.) 



19.5 (cont.) 



(iv) Example of actual listing of assembled BCD and BCD,C 
constants : 

Assembled 

Constants Instruction 

31 61 46 60 BCD 2 ,I/0 ERR0R 

25 51 51 46 

31 61 46 60 BCD 3,1/0 ERR0R 

25 51 51 46 

51 60 60 60 

63 25 62 63 BCD,C 9, TEST PR0G 

60 47 51 46 

27 

63 25 62 BCD,C 6, TEST PR0G 

63 60 47 

63 BCD,C 10, TEST PR0G 

25 62 63 60 
47 51 46 27 
60 

2 5 45 24 BCD,C 4, END 

60 00 00 00 



19.6 VARIABLE FIELD CONSTANTS 
19.6.1 Introduction 

The general form of the instruction is 



yfQ~ Mn/vy. . . . . , Mn/v 



where M = mode indicator 

n = positive decimal integer denoting the number of 
hit positions in the variable field specified by 
this subfield. (NOTE: the range of values of n 
varies with the mode M) . 

v = the content of the field. This varies according 
to the mode and is restricted by the declared 
length . 

As many address subfields as may be contained on a single card are allowed. 
Each subfield is terminated by a comma, except the last, which is termin- 
ated by a blank. 

Use : 

The instruction is used to enter information in one of the 
following modes into a field of a designated bit-length. 

(i) octal numbers 

(ii) character codes (BCD) 

(iii) relocatable addresses (either word or character addresses) 

or (iv) constants. 

It enables information to be packed into computer words during 
assembly time. 

Packing : 

(i) Values are entered right adjusted in the field, with sign 
extension. 

(ii) Character strings are entered left adjusted, with blank fill. 

e.g. A B X is a character string. 

If entered in a 24-bit character 
WD, it will be entered as: 



21 22 69 60 



Relocation : 

If relocatable addresses are entered into a field, the 
addresses will be relocated when the assembled subprogram is loaded. 
(The listing will show only the assembled fields.) 



19.6.2 Octal Mode 



irVia-no w indicates the octal mode* 

n indicates the number of bit positions in the field. 
It may be in the range 1-24 inclusive. 



19.6.2 (cont.) 



v indicates the octal information to be entered into the field. 
It may be 1-8 octal digits, and may be signed, (if v is 
negative, the filled content is stored in one's complement 
form). The information is entered right justified in the field, 
zero filled if positive, one-bit filled if negative. 

A binary scale factor, similar to that used with the OCT pseudo 
instruction, may be specified. 

Example : VFD 024/24B6 

Assembled as 00002400 
Examples ; (i) VFD 024/30502 

Assembled as 00030502 

(ii) VFD 024/- 30502 

Assembled as 77747275 

(iii) VFD 015/30502 

Assembled as 30502000 
(Unused portions of the word are zero filled) 
Errors: 

If the value v exceeds the field length n 7 or is not octal, the 
error is flagged and the field is set to zero. (The C0MPASS address 
field error flag A appears on the listing.) 

Example: VFD 015/30502,015/2030502 

Assembled as: 30502000 in word 1, 

word 2 not shown on the listing. 
"A" error flag set against the line. 



(Note: the program will not be executed.) 



Note: 



If an error occurs in any field on the card, subsequent fields 
in that card are not listed, although space is reserved for them. 



Example: 



VFD 



010/12345,015/24,015/60,024/1021 

Word 1 is set to zero because the field 

is too small. 

Words 2 and 3 are not listed. 

Program listing resumes at word 4 with 

next card. 



19.6.3 Hollerith Mode 



VFP Hn/v ~ 






Here n must be a multiple of 6 to enable storage of Hollerith 
information as 6-bit internal BCD character codes. The address subfield 
terminates with a blank or a comma. If the field is too small for the 
number of characters specified, an error results. 



21 


22 


23 


00 



Example: L0C VFD H18/ABC = 

L0C VFD H12/ABC is illegal. (Address 
field flag "A" is set). 



19.6.3 (eont.) 

If the field is longer than the number of characters specified, 
the work is blank filled. Characters are stored LEFT justified in the 
field. 



Examples L0C VFD H16/AB - I 21 



22 



19.6.4 Word Address Arithmetic Mode 



["Testis 


J8?EMTiOK,SIDBiHIK ISOMSS FiELS 






( ■ < 


VFD An/v 






L,,,,.,.,.,^. 


t ,.,,,, ,.«',.<,.,,„,„„.;*,»„-, 


«o»m^!isaai 


Hj«aii 



The address field v may be: 

(i) A constant 

(ii) A symbol 

(iii) An expression formed by the rules of 
address field arithmetic. 

If the expression yields a relocatable word address, the 
programmer must arrange so that it will be right justified on bit in 
a word, and be contained in 15 bits. If it is not relocatable, the full 
24 bits can be used. 

Examples: (i) AL0C VFD A24/A+3 

If A is a relocatable word address, previously 
defined, then answer must be 1 5 bits stored Sight 
justified in word on bit 0. 

If A is an absolute value, 24 bits can be stored. 

(ii) Using relocatable word address 

VFD 09/010, A15/BUFR 

where BUFR is a symbol, address 00002 in the 
program. 

Assembled as 01000002 

(iii) Using non relocatable symbol 

77777B 
57B 

20B 
A21/A-B+C 

Assembled as 777740 in the designated 21 bits. 
19.6.5 Character Address Mode 



A 


EQU 


B 


EQU 


C 


EQU 




VFD 



mmm 


: iSPEMTiOM, MODIFIER MtKSS FiELO 




! VFD Cn/y ,,,...,., 


,:,,,,,,,,„, 


B},U,:,„:-.^,:t::,,:»„-,.^.,',-MU-mttlfmf >• »il«:»'I. |TI 


Mi,*,**,!.,.,: 



A minimum of 17 bits is required for character addressing. 
n must therefore not be less than 17« 



19.6.5 (cont.) 

If the address is relocatable, the field must be right justified 
on bit in the word. 

Examples: (i) VFD C24/237B 

Assembled as 00000237 

VFD C24/237 

Assembled as 00000355 

(ii) Suppose NAME is assembled at location 00025 in 
the subprogram, and is a word address. 

VFD C24/NAME 

Assembled as 000001 24 

(Note: 124 is the character address of 
word address 25) 

(iii) CADR EQU,C 237B 

0PAD VFD 07/04, C17/ CADR 

CADR : is assembled as a 17-bit character address 
= 000237 
» Word 47, character position 3 

- 000473 on the listing. 

0PAD : is assembled as a 24-bit word 

- 02000237 

04 is entered right justified in a 7-bit 
field 

« 0000100 

- 000 010 

CADR is the 17-bit character address 
000237 

- 00 000 000 010 011 111 

(iv) Suppose TMPC is assembled as character in 
word 20 in the subprogram 

JAC VFD 07/4 , C 1 7/TMPC 

Assembled as 02000100 

(100 is character address of TMPC) 

19.6.6 Example of VFD instruction 

If NAME is located at address 00011 in the assembled program, 
what will be assembled as a result of: 

A EQU 77777B 

X EQU 57B 

B EQU 20B 

VFD J^12/-737,A21/A-X+B,H24/HA3,A15/NAME+2,H12/BQ 
Answer : 



70 


40 


77 


77 


74 


03 


02 


10 


36 


00 


00 


13 


22 


5 n 


00 


00 



INPUT/ OUTPUT WITHOUT CIO 

20.1 INPUT/OUTPUT CHARACTERISTICS 

20.1.1 Introduction 

20.1.2 Interface Signals 

20.1.3 System Configuration 

20.1.4 Logical Sequence of Events for Initiating 

INPUT/OUTPUT Operations 

20 . 2 CONNECT 

20.3 SELECT 

20.4 WORD ADDRESSED INPUT TO STORAGE 

20.5 WORD ADDRESSED OUTPUT FROM STORAGE 

20.6 CHARACTER ADDRESSED INPUT TO STORAGE 

20.7 CHARACTER ADDRESSED OUTPUT FROM STORAGE 

20.8 INPUT/OUTPUT TO .AND FROM THE A REGISTER 

20.8.1 Input Character to A 

20.8.2 Input Word to A 

20.8.3 Output Character from A 

20.8.4 Output Word from A 

20.9 SENSING INSTRUCTIONS 

20.9.1 Sense External Status 

20.9.2 Copy External Status and Interrupt Mask Register 

20.9.3 Sense Interrupt 

20.9.4 Sense Internal Status 

20.9.5 Copy Internal Status and Interrupt Mask Register 

20.9.6 Comments on Internal Status and the Interrupt Mask Register 

20.10 CONSOLE TYPEWRITER INPUT/OUTPUT 

20.10.1 General Description 

20.10.2 Operation 

20.10.2.1 Set Tabs, Margins and Spacing 

20.10.2.2 Clear 

20.10.2.3 Status Checking 

20.10.2.4 Type In and Type Load 

20.10.2.5 Type Out and Type Dump 

20.10.3 Typewriter Console Switches and Indicators 

20.10.4 Character Codes 

20.10.5 Input/Output Instructions 

20.10.5.1 Set Console Typewriter Input 

20.10.5.2 Set Console Typewriter Output 

20.10.5.3 Pause Instruction 
(as used with console typewriter instructions) 



Chopter JfX^, 



20.1 INPUT/OUTPUT CHARACTERISTICS 
20.1.1 Introduction 

The Input/Output section of the computer is responsible for 
transferring data to and from the computer and to and from an external 
device. Data is transferred between a 3200 Computer and its associated 
external equipment via a 3206 or 3207 Communication Channel. For 
programming purposes, the eight possible 3206 channels in a system are 
designated by numbers through 7. A 3207 replaces the 3206 type I/O 
channels 2 and 3 in expanded systems. It is programmed as channel 2. 



20.1.2 Interface signals 

Up to eight external equipment controllers may be attached in 
parallel to each 3206 Communication Channel. The following chart shows 
the principal signals which flow between a 3206 and its external equip- 
ment. The 12 status lines are active only between the channel and the 
controller to which it has been connected by the CON (77.0) instruction' 

The eight interrupt lines, designated 0-7, connect to all eight 
controllers attached to a channel. These lines match the Equipment 
Selector switch setting on each controller. For a complete description 
of the I/O interface signals as well as an I/O timing chart, refer to 
the 3000 Series I/O Specification, publication number 60048800. 



3206 or 3207 

Communication 

Channel 


Data Lines (12 for 3206; 24 for 


3207) 




External 
Equipment 
Controller 


Parity Lines (1 for 3206; 2 for 


3207) 




Connect 


Function „ 


i 
Read 


Write 






Data Signal 






iiaster vjiear 






Clear External Interrupt 




— > 


Channel Busy 




— 7 


Reply 






. Reject 


( End of Record 


& External Parity Error 


Status Lines (12) 


Interrupt Lines (8) 


Suppress Assembly/Disassembly 






Word Mark 















* The connect instruction selects one of eight controllers which may be 
attached to the channel. 



20.1.3 System configuration 

A typical configuration is: 



3200 SYSTEM 



8K 



8K 

MEM 



3204 



PROCESSOR 



J PERIPHERAL 
1 CONTROLLERS (Called EQUIPMENT) 




3245 



415 




H 



PERIPHERAL 








EQUIPMENT (Called UNITS) 








DISC CARD 


LINE 


MAGNETIC 


CARD 


PACK PUNCH 


PRINTER 


TAPES 


READER 



20.1.4 Logical Sequence of Events for Initiating INPUT/OUTPUT Operations 

Execute a connect instruction which will indicate the channel, 
controller and unit which is to receive or transmit the data. 

Sense the status of the controller to determine if the unit is available 

and papable of performing fche function and/or data transmission ("PRE -STATUS"). 

Send the appropriate select functions. Select functions 
are used to format the INPUT/OUTPUT device. 

Execute the data transmission instructions. 

At end of operation, sense the status of the controller to determine 

if the function and/or data transmission was successful. ("POST-STATUS" check). 



20.2 CONNECT 



LflCUIIN 


SPUtTIQUMtliFIEK ABBSESS Fifll 




• ■ i ■ i ■ ■- ) 


C$*t , ;x,c* , . . . , 


■ it;>,. :»:.,*.»!, 


:B ! ! '.i. i 'i=>i ! *; ! »i M i' 1 'i'«i*»^«l* , !«t"i**f*»« *•(*.''{ 


*;1*:*;>*< |K|II^«>il{lr: 



23 



18 17 15 14 12 11 



00 



77 





ch 


X 



ch = I/O channel designator, 0-7 

x = 12 bit connect code. Bits 09-11 

select one of eight controllers which 

may be attached to channel ch. Bits 

00-08 select the peripheral units 

connected to the controller. 

Description : This instruction sends a 12-bit connect code along with a 
connect enable to an external equipment controller on 1/0 
channel 'ch'. If a Reply is received from the controller 
within 100 usee, the next instruction is read from address 
P + 2. If a Reject is received or there is no response 
within 100 usee, a reject instruction is read from address 
P + 1. If the I/O channel is busy, a reject instruction 
is read immediately from address P 4- I. 

Once the connect is successful (RNI at P + 2) it will re- 
main in effect until another connect is attempted on the 
same channel or a clear function is performed. 



Examples : 



C0N 



1001B,2 



This instruction connects controller number 1 and unit 1 
on channel 2. 

The reject instruction coded at P + 1 is usually a jump 
back to the connect to cause the computer to wait until 
the connect is successful. 



e.g. 



C0N 
UJP 



1001B,2 
*-l 



20.2 (cont.) 



In the following example, which controllers and units 
will be connected on channel 1 and 2 when the computer 
stops. Assume all connects can be made. 



Answers : 

Channel 1 = Equip 0, Unit 5 

Channel 2 = Equip 3, Unit 4 



C0N 


2004B,1 


UJP 


*-l 


C0N 


300 4B, 2 


UJP 


*-l 


C0N 


5B,1 


UJP 


*-l 


UCS 





20.3 SELECT 



L0CATI8 



TSEL~~~ ;x,.e*. 



23 



18 17 15 14 12 11 



77 



ch 



00 



c h = 1/0 channel designator, 0-7 
x = 12-bit function code. Each piece 
of external equipment has a unique 
set of function codes to specify 
operations within that device. 
Refer to the 3000 Series Computer 
Systems Peripheral Equipment Codes 
publication No. 60113400 for a 
complete list of function codes. 



Description : 



This instruction sends a 12-bit function code along with 
a function enable to the unit connected to I/O channel 
'ch'. If a Reply is received from the unit within 100 
usee, the next instruction is read from P + 2. If a 
Reject is received or there is no response within 100 usee, 
a reject instruction is read from address P + 1. If the 
1/0 channel is busy, a reject instruction is read immediately 
from address P + 1 . 



The following conditions or combination of conditions will 
result in a Reject: 

1) No Unit or Equipment Connected : The referenced device 
is not connected to the system and cannot recognize a 
Function instruction. If no response is received with- 
in 100 usee, the Reject signal is generated automatically 
by the 1/0 channel. 

2) Undefined Code : When the Function code x is not defined 
for the specific device, a Reject may be generated by 
the device. However, in some cases an undefined code 
will cause the device to generate a Reply although no 
operation is performed. (Refer to the reference manual 
for the specific device.) 

3) Equipment or Unit Busy or Not Ready : The device cannot 
perform the operation specified by the function code x 
without damaging the equipment or losing data. For 
example, a Write End of File code is rejected by a tape 



: 4- -• C j-U. 



UL11L i.L 






4) Channel Busy : The selected data channel is currently 
performing a Read or Write operation. 



20.3 (cont.) 

The function codes for magnetic tape and card reader are: 



MAGNETIC TAPE CONTROLLERS 
FUNCTION CODES 



0000 


Release 


0001 


0001 


Binary 




0002 


Coded 


0002 


0003 


556 BPI 




0004 


200 BPI 


0004 


0005 


Clear 


0005 


0006 


800 BPI 


0020 


0010 


Rewind 




0011 


Rewind Unload 


0021 


0012 


Backspace 




0013 


Search Forward to 
File Mark 


0022 


0014 


Search Backward to 
File Mark 


0023 


0015 


Write File Mark 


0024 


0016 


Skip Bad Spot 




0020 


Interrupt on Ready 
and Busy 


0025 


0021 


Release Interrupt on 
Ready and Busy 




0022 


Interrupt on End of 
Operation 




0023 


Release Interrupt on 
End of Operation 




0024 


Interrupt on Abnormal 
End of Operation 




0025 


Release Interrupt on 
Abnormal End of Operation 




0040 


Clear Reverse Read 




0041 


Set Reverse Read 





3248 CARD READER CONTROLLER 
FUNCTION CODES 



Negate Hollerith to 

Internal BCD Conversion 

Release Negate Hollerith 

to Internal BCD Conversion 

Set Gate Card 

Clear 

Interrupt on Ready and 

Busy 

Release Interrupt on 

Ready and Busy 

Interrupt on End of 

Operation 

Release Interrupt on 

End of Operation 

Interrupt on Abnormal 

End of Operation 

Release Interrupt on 

Abnormal End of Operation 



Examp 1 e : 



C0N 


2B,1 


UJP 


REJX 


CT?T 
D J_iXj 


10B,1 


UJP 


REJX 


SEL 


3B,1 


UJP 


REJX 


SEL 


1B,1 


UJP 


REJX 



Connects Controller Unit 2 on channel 1 
Rewinds Tape Unit 2 to Load Point 
Sets the Density to 556 bpi 
Sets the Mode to binary 



UCS 



Exercise: What does the following group of select function codes for Tape Unit 6 
accomplish? 



C0N 
UJP 
SEL 
UJP 
SEL 
UJP 



6B,0 

REJX 

6B,0 

REJX 

13B,0 

REJX 



UCS 



20.4 WORD ADDRESSED INPUT TO STORAGE 



j UEHiSS 


pairasjoeirass man mm 


i ...... . 


WW* IN Ti?t n ^j"»,»» , . . , 




1 t ^ ttj% 
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23 



P + 1 



18 17 161514 



23 21 20 19 18 17 16 1514 



ch 



00 



74 





w, 


n 



00 



B = "1" for backward storage 

ch = I/O channel designator, 0=7 

INT = "l 11 for interrupt upon completion 

N = "0" for 12- to 24-bit assembly 

= "1" for no assembly 
m = first word address of I/O data block; 
becomes current address as I/O oper- 
ation progresses 
n = last word address of input data block, 
plus one (minus one, for backward 
storage) 



Description ; This instruction transfers a word-addressed data block from 
an external equipment to storage. Transferring 12-bit bytes 
or 24-bit words depends upon the type of I/O channel used. 
The 3206 utilizes 12-bit bytes and the 3207 uses 24-bit words. 

During forward storage and 12- to 24-bit assembly, the first 
byte of a block of data is stored in the upper half of the 
memory location specified by the storage address. Conversely, 
during backward storage, the first byte is stored in the 
lower half of the memory location. 

This instruction is an initiate type instruction, which means 
all the foregoing actions will occur only if the instruction 
executes normally. And RNI will be at P + 3. However, if 
the input/output control for the specified channel in Block 
Control is busy, the instruction will act as a double NOP and 
RNI from P + 2. The instruction at that location is termed 
the 'Reject Instruction'. 



Examples ; 



(i) 



C^N 


1001B,1 


RTJ 


REJX 


SEL 


2B,1 


RTJ 


REJX 


SEL 


3B,1 


RTJ 


REJX 


INPW 


l,INBUFF,INBUFF+50 


RTJ 


REJX 



This example initiates an Input from tape unit 1, controller 1 
on channel 1. The tape is written in BCD mode at 556 bpi. 



20.4 (cont.l) 



(ii) A block of memory is as shown: 



INEUFF 



77777777 



77777777 



77777777 



77777777 



77777777 



77777777 



77777777 



77777777 



77777777 



77777777 



77777777 



77777777 



77777777 



77777777 



77777777 



77777777 



77777777 



77777777 



77777777 



77777777 



And the contents of a data card is: 
ABCDEFGHIJKABCDEFGHIJKABCDEFGHIJKABCDEFGHIJKABCDEFGHIJKABCDEFGHIJKABCDEFGHIJKABC 



(1) 



O^ 



(3) 



What will be the contents of memory as a result of 
the following coding examples? 



C0N 




3000B,0 


UJP 




REJX 


INPW 




0,INBUFF,INBUFF+20 


UJP 




REJX 


G0N 




3000B.0 


UJP 




REJX 


INPW j 


B 


, INBUFF+19 , INBUFF- 1 


UJP 




REJX 


C0N 




3000B,0 


UJP 




REJX 


INPW 


N 


, INBUFF , INBUFF+40 


UJP 




REJX 



(4) C0N 3000B,0 

UJP REJX 

INPW,B,N 0,INBUFF+3 9, INBUFF -1 

UJP REJX 



20.4 (cont.2) 



Answers : 



(1) 



INBUFF 



21222324 
25262730 
31414121 
22232425 
26273031 
41422122 
23242526 
27303141 
42212223 
24252627 
30314142 
21222324 
25262730 
31414221 
22232425 
26273031 
41422122 
23242526 
27303141 
42212223 



(2) 



INBUFF 



22334221 
31412730 
25262324 
21224142 
30312627 
24252223 
42213141 
27302526 
23242122 
41423031 
26272425 
22234221 
31412730 
25262324 
21224142 
30312627 
24252223 
42213141 
27302526 
23242122 



(3) 



INBUFF 77772122 



(4) 



INBUFF 



III / JLJZ.H 

77772526 

77772730 

77773141 

77774221 

77772223 

77772425 

77772627 

77773031 

77774142 

77772122 

77772324 

77772526 

77772730 

77773141 

77774221 

77772223 

77772425 

77772627 

77773031 

77774142 

77772122 

77772324 

77772526 

77772730 

77773141 

77774221 

77772223 

77772425 

77772627 

77773031 

77774342 

77772122 

77772324 

77772526 

77772730 

77773141 

T777/,T)1 

I I I I -Ti.i.1. 

77772223 



77772223 

77774221 

77773741 

77772730 

77772526 

77772324 

77772122 

77774142 

77773031 

77772627 

77772425 

77772223 

77774221 

77773141 

77772730 

77772526 

77772324 

77772122 

77774142 

77773031 

77772627 

77772425 

77772223 

77774221 

77773141 

77772730 

77772526 

77772324 

77772122 

77774142 

77773031 

77772627 

77772425 

77772223 

77774221 

77773141 

77772730 

77772526 

77772324 

77772122 



20.5 WORD ADDRESSED OUTPUT FROM STORAGE 



itPEMTIOKJOSiniRS kODKESS HiU 
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P + 1 



23 



18 17 16 1514 



23 21 20 19 18 17 161514 



00 



76 





rf! 


n 



00 



ch 




B 


N 


INT 


w, 


m 



B = "1" for backward storage 

ch = I/O channel designator 

INT = "1" for Interrupt upon completion 

N = "0" for 24- to 12 bit disassembly 

= "1" for straight 24-bit (no disassembly) 

data transfer 
m = first word address of I/O data block; 
ecomes current address as I/O 

operation progresses 
n = last word address of output data 

block, plus one (minus one, for 

backward output) 



Description : This instruction transfers a word-addressed block of data 
consisting of 12-bit bytes or 24-bit words, from storage 
to an external equipment. 

With no disassembly, 12 or 24-bit transfer capability depends 
upon whether a 3206 or 3207 1/0 channel is. used. If an 
attempt is made to send a 24-bit word over a 3206 1/0 channel 
the upper byte will be lost. 

This instruction is an initiate type instruction, which means 
all the foregoing actions will occur only if the instruction 
executes normally. And RNI will be at P + 3. However, if 
the input/output control for the specified channel in Block 
Control is busy, the instruction will act as a double NOP and 
RNI from P + 2. The instruction at that location is termed 
the 'Reject Instruction '• . 



Examples : 



A block of memory is as shown: 



Numerical Value 



Alphabetical Representation 



0UTBUFF 


21222324 




25262730 




31414221 




22232425 




26273031 




41422122 




23242526 




27303141 




42212223 




24252627 




30314142 




21222324 




25262730 




31414221 




22232425 




26273031 




U422122 




, "242526 




27303141 




42212223 



A B C D 


E F G H 


I J K A 


B C D E 


F G H I 


J K A B 


C D E F 


G H I J 


K A B C 


D E F G 


H I J K 


A B G D 


E F G H 


I J K A 


B C D E 


F G H I 


J K A B 


C D E F 


G H I J 


K A B C 



20.5 (cont.) 



Answers : 



What will be printed on the line printer as a result of 
the following coding examples? 



(1) 


C0N 


5000B,1 




UJP 


REJX 




0UTW 


1 , 0UTBUFF , 0UTBUFF+2O 




UJP 


REJX 



(2) C0N 5000B,1 

UJP REJX 

0UTW,B 1,0UTBUFF+19,0UTBUFF-1 

UJP REJX 



(3) C0N 5000B,1 

UJP REJX 

0UTW,N 1,0UTBUFF,0UTBUFF+2O 

UJP REJX 



(4) C0N 5000B,1 

UJP REJX 

0UTW,B,N 1,0UTBUFF+19,0UTBUFF-1 

UJP REJX 



(1) 
ABCDEFGHIJKABCDEFGHIJKABCDEFGHIJKABGDEFGHIJBCABCDEFGHIJKABGDEFGHIJKABGDEFGHIJKABC 

(2) 
BCKAIJGHEFCDABJKHIFGDEBGKAIJGHEFCDABJKHIFGDEBCKAIJGHEFGDABJKHIFGDEBGKAIJGHEFCDAB 

(3) 
CDGHKADEHIABEFIJACFGJKCDGHKADEHIABEFIJBC 

(4) 
BCIJEFABHIDEBCAGHCDJICFGBCIJEFABHIDEKAGHCD 



20.6 CHARACTER ADDRESSED INPUT TO STORAGE 



INPC,INr y B,H cA,r,« 



P + 1 



23 






18 


17 


16 


00 


73 





s 


23 21 20 19 18 17 16 


00 


ch 


m 


B 


H 


INT 


r 



B = "1" for backward storage 

ch = I/O channel designator, 0-3 

H = "0" for 6- to 24-bit assembly 
= "1" for 12- to 24-bit assembly 

INT = "1" for interrupt upon completion 

r = first character address of I/O data block; 
becomes current address as I/O operation 
progresses 

s = last character address of input data 
block, plus one (minus one, for back- 
ward storage) 

Description : This instruction transfers a character-address block of 

data, consisting of 6-bit characters or 12-bit bytes, from 
an external equipment to storage. During 12- to 24-bit 
assembly, the lowest bit of each character address is 
forced to remain a "0" in register OX. This ensures that 
assembled bytes are in either the upper or the lower half 
of the word being stored. 

This instruction is an initiate type instruction, which means 
all the foregoing actions will occur only if the instruction 
executes normally. And RNI will be at P + 3. However, if 
the input/output control for the specified channel in Block 
Control is busy, the instruction will act as a double NOP and 
RNI from P + 2. The instruction at that location is termed 
the 'Reject Instruction'. 



Examples 



A block of memory is as sh 



INBUf'f 



77777777 



77777777 



77777777 



77777777 



77777777 



77777777 



77777777 



77777777 



77777777 



77777777 



77777777 



77777777 



77777777 



77777777 



77777777 



77777777 



77777777 



77777777 



77777777 



And the contents of a data card is: 
ABCDEFGHIJKABCDEFGHIJKABCDEFGHIJKABCDEFGHIJKABCDEFGHIJKABCDEFGHIJKABCDEFGHIJKABC 



20.6 (cont.) 



What will be the contents of memory as a result of the 
following coding examples? 

(1) 



(2) 



(3) 



(4) 



C0N 


3000B,0 


UJP 


REJX 


INPC 


0,INBUFF,INBUFF+80 


UJP 


REJX 


C0N 


3000B,0 


UJP 


REJX 


INPC,B 


, INBUFF+7 9 , INBUFF- 1 


UJP 


REJX 


C0N 


3000B,0 


UJP 


REJX 


INPC,H 


0, INBUFF, INBUFF+ 80 


UJP 


REJX 


C0N 


3000B,0 


UJP 


REJX 


INPC,B,H 


, INBUFF+79 , INBUFF- 1 


UJP 


REJX 



Answers : 



U) 



(2) 



21222324 
25262730 
31414221 
22232425 
26273031 
41422122 
23242526 
27303141 
42212223 
24252627 
30314142 
21222324 
25262730 
31414221 
22232425 
26273031 
41422122 
23242526 
27303141 
42212223 



23222142 
41313027 
26252423 
22214241 
31302726 
25242322 
21424131 
30272625 
24232221 
42413130 
27262524 
23222142 
41313027 
26252423 
22214241 
31302726 
25242322 
21424131 
30272625 
24232221 



(3) 



(4) 



Same as #1 



Same as #2 



20.7 CHARACTER ADDRESSED OUTPUT FROM STORAGE 



4>UTC,INT,8 t H *,r,s 



P + 1 



23 






18 


17 


16 


00 


75 





s 


23 21 20 19 18 17 16 


00 


ch 


M 


B 


H 


INT 


r 



B - "1" for backward storage 

ch ■- I/O channel designator, 0-3 

H = "0" for 24- to 6-bit disassembly 

- "1" for 24- to 12-bit disassembly 
TNT = "1" for interrupt upon completion 
r - first character address of 1/0 data 

block; becomes current address as 

I/O operation progresses 
s — last character address of output 

data block, plus one (minus one, 

for backward output) 

Description ; This instruction transfers a character-addressed block of 
data, consisting of 6-bit characters or 12-bit bytes, from 
storage to an external equipment. 

This instruction is an initiate type instruction, which means 
all the foregoing actions will occur only if the instruction 
executes normally. And RNI will be at P + 3. However, if 
the input/output control for the specified channel in Block 
Control is busy, the instruction will act as a double NOP and 
RNI from P + 2. The instruction at that location is termed 
the 'Reject Instruction'. 



Examples : 



A block of memory is as shown: 



Numerical Value 



Alphabetical Representation 



0UTBUFF 



21222324 



25262730 



31414221 



22232425 



26273031 



41422122 



23242526 



27303141 



42212223 



24252627 
30314142 
21222324 
25262730 
31414221 
22232425 
26273031 
41422122 
23242526 
27303141 
42212223 



A B C D 


EFGH 


I J K A 


B C D E 


F G H I 


J K A B 


C D E F 


G H I J 


K A B C 


D E F G 


H I J K 


A B C D 


EFGH 


I J K A 


B C D E 


F G H I 


J K A B 


C D E F 


G H I J 


K A B C 



20.7 (cont.) 



What will be printed on the line printer as a result of the 
following coding examples? 



(1) 


C0N 


5000B,1 




UJP 


REJX 




0UTC 


1 , 0UTBUFF , 0UTBUFF+8O 




UJP 


REJX 



(2) C0N 5000B,1 

UJP REJX 

0UTC,B 1,0UTBUFF+79,0UTBUFF-1 

UJP REJX 



(3) G0N 5000B,1 

UJP REJX 

0UTC,H 1,0UTBUFF,0UTBUFF+8O 

UJP REJX 



(4) C0N 5000B,1 

UJP REJX 

0UTC,B,H 1,0UTBUFF+79,0UTBUFF-1 

UJP REJX 



Answers : 

(1) 
ABCDEFGHIJKABCDEFGHIJKABCDEFGHIJKABCDEFGHIJBCABGDEFGHIJKABCDEFGHIJKABCDEFGHIJKABC 

(2) 
CBAKJIHGFEDCBAKIJHGFEDCBAKJIHGFEDCBAKJIHGFEDCBAKJIHGFEDCBAKJIHGFEDGBAKJIHGFEDCBA 

(3) 
Sames as Number 1 

(4) 
Same as Number 2 



20.8 INPUT/OUTPUT TO AND FROM THE A REGISTER 
20.8.1 Input Character to A 

INAC,tNT efc 



P + 1 



23 




18 


17 


16 


00 


73 


1 


BlIP 


MMHi 


23 21 20 


18 17 16 


00 


ch 





INT 


HHHP 


-llllflll 



Bits 00-16 at 
P and P+l should 
be loaded with O's 



Description: 



Example: 



ch = I/O channel designator, 0-7 

INT = "1" for interrupt upon completion 

"0" for do not interrupt upon completion 

This instruction transfers a 6-bit character from an 
external equipment into the lower 6-bits of the A regis- 
ter. A is cleared prior to loading and the upper 18-bits 
remain cleared. 

Main control is stalled until the character is received 
from the external equipment. At that time it resumes 
reading instructions and RNI's from P + 3. If the 
input/output control for the specified channel in Block 
Control is busy, the instruction will act as a double 
NOP and RNI from P + 2. The instruction at that location 
is termed the 'Reject Instruction'. 



C0N 


3000B,1 


UJP 


*-l 


INAC 


1 


UJP 


*-2 



This example inputs 6-bits from controller 3, unit on 
channel 1 into the lower 6-bits of the A register. A 
is cleared prior to loading and the upper 18-bits remain 
cleared. 



20.8.2 Input Word to A 



P + 1 



iNAW,iNr a, 



23 




18 17 16 


00 


74 


1 


IlllilP 


^Hil 


23 21 20 


18 17 16 


00 


ch 





INT 


■■■■■111 



Bits 00-16 at 
P and P+l should 
be loaded with O's 



ch = 1/0 channel designator, 0-7 

INT = "1" for interrupt upon completion 

"0" for do not interrupt upon completion 

Description: This instruction transfers a 12-bit byte into the lpwer 
12-bits of A or a 24-bit word into all of A from an 
external equipment. Transferring 12 or 24 bits depends 
upon whether a 3206 or 3207 1/0 channel is used. (A) is 
cleared prior to loading and, in the case of a 12-bit 
input, the upper 12 bits remain cleared. 



20.8.2 (cont.) 



Main control is stalled until the byte (word) is received 
from the external equipment. At that time it resumes 
reading instructions and RNI's from P + 3. If the 
input/output control for the specified channel in Block 
Control is busy, the instruction will act as a double NOP 
and RNI from P + 2. The instruction at that location is 
termed the 'Reject Instruction'. 



Note: Bits 18, 19 and 20 are all zeros when a 3206 data channel is 
used. If the operation with A involves the use of a 3207, 
these bits take on the following significance: 

Bit 20 = always a "0" 

Bit 19 = If bit 18 = "l", the state of bit 19 is 
of no consequence. 

If bit 18 = "0", a "1" in bit 19 signifies 
backward operation. A "0" in bit 19 
signifies a forward operation. 



Examples: 



If the connect code for the card reader is 3000B and a data 
card has ABCD in the first four columns, what will be the 
contents of the A register as a result of the following 
coding examples? Assume a 3206 data channel. 



C0N 


3000B,0 


UJP 


REJX 


TNAU 





UJP 


REJX 


swer : (A) 


= 00002122 



Also, this is all the information 
that is available from that card. 
Another input to A would cause the 
next card to be read. 



20.8.3 Output Character from A 



mmm 



mmm.mmm mms heu 



pTACylNT cM 



P + 1 




Bits 00-16 at 
P and P+l should 
be loaded with 0's 



Description : 



ch = I/O channel designator, 0-7 

INT = "1" for interrupt upon completion 

"0" for do not interrupt upon completion 

This instruction transfers a character from the lower 
6-bits of A to an external equipment. The original 
contents of A are retained. 



After outputting the character, main control proceeds 
immediately and RNI's at P + 3. Should the input/output 
control for the specified channel in Block Control be 
busy, the instruction will act as a double NOP and RNI 
from P + 2. The instruction at that location is termed 
the 'Reject Instruction'. 



20.8.3 (cont.) 



Example : If the connect code for the external device is 3002B, it is 
connected to channel 4, and it requires a data output of 
21B to perform a certain task, what coding is necessary to 
perform the task. 



Ans : 



C0N 


3002B,4 


UJP 


*-l 


ENA 


21B 


0TAC 


4 


UJP 


*-2 



The data sent to the external device is 0021B accompanied by 
a suppress assembly/disassembly control signal. This latter 
informs the device to ignore the upper 6 bits and recognize 
the 21B only. 



20.8.4 Out put Word from A 



4TAW t lNT (h 



P + 1 



23 




18 


17 


16 


00 


76 


1 


IP 


.^iiiiiiiiiii 


23 21 20 


18 17 16 


00 


ch 





INT 


HP 


MIMMHM 



Bits 00-16 at 
P and P+l should 
be loaded with O's 



cl. - I/O channel designator, 0-7 

INT = "1" for interrupt upon completion 

"0" for do not interrupt upon completion 

Description ; This instruction transfers a 12-bit byte from the lower 12 
bits of A (or all 24-bits of A) to an external equipment 
depending upon the type of 1/0 channel (3206 or 3207) that 
is used. The contents of A is not disturbed and is retained. 

After outputting the information, main control proceeds 
immediately and RNI ' s at P + 3. Should the input/output 
control for the specified channel in Block Control be 
busy, the instruction will act as a double NOP and RNI 
from P + 2. The instruction at that location is termed 
the 'Reject Instruction'. 



Note: Bits 18, 19 and 20 are all zeros when a 3206 data channel is 
used. If the operation with A involves the use of a 3207, 
these bits take on the following significance: 

Bit 20 = always a "0" 

Bit 19 = If bit 18 = "1", the state of bit 19 is 
of no consequence. 

If bit 18 = "0", a "1" in bit 19 signifies 
backward operation. A "0" in bit 19 
signifies a forward operation. 



Exarnpl e : Assuming a remote typewriter connected to a data channel 
(not to be confused with the console typewriter) has a 
connect code of 5000B and is connected to channel 2, what 
code is necessary to cause that typewriter to perform a 
carriage return tab sequence of operations? The code for 
a carriage return is 77B and for the tab is 75B. 



20.8.4 (cont.) 



Answer: 


C0N 


5000B,2 




UJP 


*-l 




ENA 


7775B 




0TAW 


2 




UJP 


*-2 



The data transmitted to the typewriter is 7775B, 



20.9 SENSING INSTRUCTIONS 



20.9.1 Sense External Status 



tOCATISH 



SOPISfcTiBij .WttOlftEBS MEIESS HIL8 
"BXS " '". X,eA , . 



23 



18 17 15 14 12 11 



00 



77 


2 


ch 


X 



Description : 



en — J-/u crieinnej. uesiguduOi. , u-i 

x = external status sensing mask code 

When a peripheral equipment controller is connected to an 

t / r\ _i 1 U., <-U„ r>rtM ("77 (Tl n' r-, c-<- v-,i^f- i ^,n hViQ FYC1 incfnip. 

i/U l^LlCtllllCi. uy LUC -oy/LI V' ' • ^ / j.noi.i.wiv-1. J.wi.1. , V-....V. *j«».^ ^..^v.* 

tion can sense conditions within that controller. Twelve 
status lines run between each controller and its 1/0 channel. 
Each line may monitor one condition within the controller, 
and each controller has a unique set of line definitions. 
To sense a specific, condition, a "1" is placed in the bit 
position of the status sensing mask that corresponds to the 
line number. When this instruction is recognized in a 
program, RNI at address P + 1 if an external status line 
is active when its corresponding mask bits are ''1". RNI 
at address P + 2 if no selected line is active. 

Status Codes: Following are the status response codes for magnetic tape and 
card reader: 



MAGNETIC TAPE 
STATUS CODES 



3248 CARD READER 
STATUS CODES 



XXXI 


Ready 


XXXI 


XXX2 


Channel and/or 


XXX2 




Read/Write Control 


XXX4 




and/or Unit Busy 


XXIX 


XXX4 


Write Enabled 


XX2X 


XXIX 


File Mark Read 




XX2X 


At Loadpoint 




XX4X 


End-of-Tape Read 
Density 2° bit** 


XX4X 


X1XX 


X1XX 


X2XX 


2 1 bit** 






** 00 = 200 bpi 


X2XX 




01 = 556 bpi 






10 = 800 bpi 


X4XX 




11 = undefined 




X4XX 


Lost Data 


1XXX 


1XXX 


End of Operation 




2XXX 


Vertical or 






Longitudinal 


2XXX 




Parity Error 




4XXX 


Reserved by another 
control (multiple 
channel controllers 
only) 





Rsadv 

Busy 

Binary Card 

File Card Read 

Fail to Feed, 

Stacker Full or 

Jam 

Input Tray Empty 

Input Tray Empty and 

End of File Switch On 

Ready and not Busy 

Interrupt Present 

End of Operation 

Interrupt Present 

Abnormal End of 

Operation Interrupt 

Present 

Read Compare, 

Preread Error or 

Illegal Suppress 

Assembly 



20.9.1 (cont.) 



Comments: 



Refer to the 3000 Series Computer Systems Peripheral 
Equipment Codes manual, publication no. 60113400 for a 
complete list of status response codes. 



Example : 



The example below accomplishes the following: 



a) 


Connects the card reader on channel 


. 


b) 


Checks the 


status of the card reader. 






If busy it 


waits until it becomes not 


busy. 


c) 


Initiates reading of a card at the ca 


rd reader and 




transfer of 


the data read to memory. 




d) 


Waits until 


the INPUT is complete. 






C0N 


3000B,0 


CONNECT CARD RE 




UJP 


*-l 






EXS 


2B,0 


SENSE BUSY 




UJP 


*-l 


LOOP IF BUSY' 




INPW 


, INBUFF , INBUFF+20 


INITIATE INPUT 




UJP 


*_2 






EXS 


2B,0 


SENSE BUSY 




UJP 


*-l 


LOOP UNTIL DONE 



ucs 



20.9.2 Copy External Status and Interrupt Mask Register 



IQC»!I8« 



8PEMTIM MOtiriEK MMESS fiflB 



CJPY 



23 18 17 15 14 12 11 



00 



77 


2 


ch 


OOOO 



ch = I/O channel designator, 0-7 
Description : This instruction performs the following functions: 

(1) The external status code from I/O channel ch is 
loaded into the lower 12 bits of A. See EXS 
instruction. 

(2) The contents of the Interrupt Mask register are 
loaded into the upper 12 bits of A. 

(3) RNI from address P + 1. 



Examples : If the INTERRUPT MASK REGISTER is 0032g, and the external 
status on channel 1 = 1004g, what will be in A after 
execution of the following instruction? 



C0PY 1 
Answer : 

(a) A is cleared. 

(b) Contents of INTERRUPT MASK REGISTER put in upper 
12 bits of A. 

(c) External status on channel 1 put in lower 12 bits of A, 
(A) = 00321004 



20.9.3 Sense Interrupt 



LSDATIOH 



■, iramoeiiFKK 


IBDRESS fiElB 




INTS _ 


;x»«* t ; , , ,..:.. 




: l^ _ ( _, s , ,-<..»,, 


!»i>:j a S l 1 lU».«Jlll'li» 


«.»:,»!«,»,:« 


23 18 17 


15 14 12 11 




r- 


4 


ch 


X 



00 

Zl 



ch = I/O channel designator, 0-7 
x = Interrupt sensing mask code 

Description : Sense for the interrupt conditions listed in the following 
table. RNI from P + 1 if an interrupt line is active 
corresponding to any "1" bit in the mask. If none of the 
selected lines are active, RNI from P + 2. Internal 
interrupts are cleared as soon as they are sensed. External 
interrupts are cleared by connecting the unit and executing 
one of the SEL functions controlling peripheral interrupts. 

INTERRUPT SENSING MASK BIT ASSIGNMENTS 



Mask Bit 


Mask Code 


Position 


X 


00 


0001 


01 


0002 


02 


0004 


03 


0010 


04 


0020 


05 


0040 


06 


0100 


07 


0200 


08 


0400 


09 


1000 



10 



11 



2000 



4000 



Interrupt Condition Represented 

I/O Equip # on designated channel 
1 

2 

3 External 

4 Interrupts 
5 
6 
7 

Real-time Clock 

Exponent Overf low/Underflow (fit pt) 

and BCD Fault Internal 

Arithmetic Overflow Interrupts 

and Divide Fault (integer) 

Search/Move Completion 



J 



Examples-: i) If there is an interrupt line active on channel 2, which 
instruction will be executed after executing the INTS 
instruction in the following section of code? 



Answer: 



INTS 

UJP 

UJP 

UJP 



4B,2 
INT ADD 
N0INT 

INTADD 



if equip, nr. 4 generated the 
interrupt, else UJP N0INT 



ii) The contents of the A register = 37777777 and the instruction 
executed is: 

INA 1 

An arithmetic overflow is generated. What code is necessary 
to sense this fact? 



Answer ; 



INTS 



2000B 



UJP overflow-routine / n 

normal non-overflow next instruction (P+2; 

Note: The "ch" designator is required only when sensing 
external interrupts originating on a channe^. 



20.9.4 Sense Internal Status 



INS x.dT 



23 



18 17 15 14 12 11 



00 



77 


3 


ch 


X 



ch = I/O channel designator, 0-7 

x = Internal Status Sensing Mask Code 

Description : Sense for the internal conditions listed in the following 
table. RNI from P + 1 if an internal condition is present 
corresponding to any "1" bit in the mask. If none of the 
selected conditions are present, RNI from P + 2. Internal 
conditions are cleared as soon as they are sensed, except 
when they are related to channel "ch". 

INTERNAL STATUS SENSING MASK BIT ASSIGNMENTS 



Mask Bit 


Mask Code 


Position 


X 


00 


0001 


01 


0002 


02 


0004 


03 


0010 


04 


0020 


05 


0040 


06 


0100 



Internal Condition Present 



Channel 
Control 



J 



07 



0200 



08 


0400 


09 


1000 


10 


2000 


11 


4000 



Parity Error 

Read Active 

Write Active 

External (controller) Reject 

Internal (no response )_ Reject_ 

Illegal Write Main Control 

C0N or C0N and SEL~ executed 
and channel currently not busy 
Block Control Interrupt waiting 
Write: Buffer complete 
Read: Buffer complete or 

End of Record at peripheral 
Exponent Overflow/Underflow fault 
(fit pt option) 
Arithmetic Overflow fault 
(main arithmetic section) Main Control 
Divide fault 

(main arithmetic or fit pt opt) 
BCD fault (BCD option) 



Channel 
Control 



f 



Example: The following coding example sums a table of 50 numbers. 

It detects and corrects for arithmetic overflow using the INS 
instruction. 



L00P 



ENI 
ENA 
ADA 

INS 
UJP 

IJD 



49,1 

TABLE , 1 

1000B,0 
0V 

L00P,1 



FINIS 


SHAQ 


-24 




ADAQ 


SUM48 


* 








UJP 


EXIT 


0V 


SHAQ 


-24 




X0A,S 


-0 


* 


ADAQ 


SUM48 




STAQ 


SUM48 




ENA 







IJD 


L00P , 1 




UJP 


FINIS 


SUM48 


DECD 





TABLE 


BSS 


50 



SET L00P INDEX T0 MAX NR - 1 

CLEAR THE ACCUMULAT0R 

ADD NEXT ENTRY 0F TABLE T0 THE 

ACCUMULAT0R 
WAS THERE ARITHMETIC 0VERFL0W 
YES, JUMP T0 C0RRECT AT L0CATI0N 

0V 
AFTER LAST TIME THR0UGH L00P - 

N0 DECREASE Bl BY 1 0R JUMP 

T0 L00P 
C0NVERT 24 BIT SUM T0 48 BITS 
ADD C0N VERTED SUM T0 48 BIT 

ACCUMULAT0R 

C0RRECT F0R ARITHMETIC 0VERFL0W 
BY C0MPLEMENTING THE SIGN 
ADD C0N VERTED SUM T0 48 BIT 
ACCUMULAT0R 

CLEAR 24 BIT ACCUMULATOR 
DECREASE Bl AND JUMP T0 L00P 



20.9.4 (cont.) 



Exercise: Assuming that data channel 5 is busy at the moment, determine 
if the operation in progress is a Read or a Write. Write 
the coding required to do this check. 



20.9.5 Copy Internal Status and Interrupt Mask Register 



! mmm 


8?[«TS81SMSf!'fSS 


MBMSS rtllB 










CIAfS 
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liJ.IV^*...: 



23 



18 17 15 14 12 11 



00 



77 


3 


ch 


0000 



ch = I/O channel designator, 0-7 
Description : The CINS instruction performs the following functions: 

1) The internal status information (see table in Section 20.9.4) 
is loaded into the lower 12 bit positions of the A register. 

2) The contents of the Interrupt Mask register are loaded into 
the upper 12 bit positions of the A register. 

3) RNI from P + 1 

Example : If the Interrupt Mask register contains 0121g and the internal 
status is OIIIq, what will be in the A register after execution 
of the following instruction? 

GINS 1 

Answer: a) The A register is cleared 

b) The contents of the Interrupt Mask Register is 
copied in the upper 12 bits of A. 

c) The current internal status is copied in the 
lower 12 bits of A. 

(A) =01210111 8 

Exercises : i) If the Interrupt Mask register contains 7400g and a parity 

error has occurred on the channel for data channel 6 (called 
a "transmission parity error"), what will be in A after the 
execution of: 

CINS 6 



ii) If the Interrupt Mask register contains 0403g and the reject 
instruction following a SEL was executed, what coding would 
be necessary to determine the cause of the reject. (Remember 
there are three sources of SEL rejects 1) channel busy, 2) 
function illegal, and 3) function not recognized) 

20.9.6 Comments on Internal Status and the Interrupt Mask Register 

At first glance, it appears that the INTS and INS instructions 
perform essentially the same function with relation to internal 
conditions. However, there is one important difference and that 
is the INTS instruction needs both the condition and the 
interrupt mask bit set to get a match. The INS instruction 
senses the internal condition without the necessity of having the 
interrupt mask register bit set. 



20.10 CONSOLE TYPEWRITER INPUT/ OUTPUT 
20.10.1 General Description 



The 3192 Console Typewriter is an on-line input-output 
(I/O) device; i.e., it requires no connection to a 
communication channel and no function codes are issued. 
The typewriter receives output data directly from storage 
via the lower 6 bits of the Data Bus. Inputs to storage 
are handled in the same manner. 

The console typewriter consists of an electric typewriter 
and a typewriter control panel mounted on a desk console. 

Used in conjunction with block control and the Register 
File, the typewriter may be used to enter a block of 
internal binary-coded characters into storage and to 
print out data from storage. The two storage addresses 
that define the limits of the block must be stored in 
the register file prior to an input or output operation. 
Register 23* contains the initial character address of the 
block, and register 33 contains the last character address, 
plus one. Because the initial character address is 
incremented for each storage reference, it always shows 
the address of the character currently being stored or 
dumped. Output operations occur at the rate of 15 
characters per second. Input operations are limited by 
the operator's typing speed. 



*The upper seven bits of registers 23 and 33 should be "0". 

20.10.2 Operation 

The general order of events when using the console type- 
writer for an input or output operation is: 

1) Set tabs, margins and spacing. Turn on typewriter. 

2) Clear 

3) Check status 

4) Type out or type in 

20.10.2.1 Set tabs, margins, and spacing 

All tabs, margins, and paper spacing must be set manually 
prior to the input or output operation. A tab may be set 
for each space on the typewriter between margins. 

20.10.2.2 Clear 

There are three types of clears which may be used to clear 
all conditions (except ENCODE FUNCTION) existing in the 
typewriter control. These are: 

1) Internal Clear or a Master Clear 

This signal clears all external equipment, the 
communications channels, the typewriter control, 
and sets the typewriter to lower case. 



20.10.2.2 (cont.) 
2) 



Clear Channel, Search/Move Control, or Type Control 
instruction (77.51). 

This instruction selectively clears a channel, the 
S/M control, or, by placing a "1" in bit 08 of the 
instruction, the typewriter control, and sets the 
typewriter to lower case. 

3) Clear Switch on typewriter. 

This switch clears the typewriter control and sets 
the typewriter to lower case. 



20.10.2.3 Status Checking 



The programmer may wish to check the status of the type- 
writer before proceeding. This is done with the Pause 
instruction. Status response is returned to the computer 
via two status lines. 

The typewriter control transmits two status signals that 
are checked by the Busy Comparison Mask using the Pause 
instruction. These status signals are: 

Bit 09 Type Not Finish 
Bit 10 Type Not Repeat 

An additional status bit appears on sense line 08. This 
code is Type Busy, and is transmitted by block control in 
the computation section when a typewriter operation has 
been selected. If the programmer is certain of the status 
of the typewriter, this operation may be omitted. 

20. 10.2.4 Type In and Type Load 

The Set Type In instruction or pressing the TYPE LOAD switch 
on the console or typewriter permits the operator to enter 
data directly into storage from the typewriter. When the 
TYPE LOAD indicator on the console or typewriter glows, the 
operator may begin typing. The Encode function switch must 
be depressed to enable backspace, tab, carriage return, and 
case shifts to be transmitted to the computer during a type- 
writer input operation. 

Input is in character mode only. As each character is typed, 
the information is transmitted via the Data Bus to the stor- 
age address specified by block control. This address is 
incremented as characters are transmitted. When the current 
address equals the terminating address, the TYPE LOAD indicator 
goes off and the operation is terminated. Data is lost if 
the operator continues typing after the TYPE LOAD indicator 
goes off. 

20.10.2.5 Type Out and Type Dump 

The typewriter begins to type out when the computation 
section senses a Set Type Out instruction or the operator 
presses the TYPE DUMP switch on the console or typewriter. 
Single 6-bit characters are sent from storage to the 
typewriter via the lower 6 bits of the Data Bus. When 
the current address equals the terminating address, the 
TYPE DUMP indicator goes off and the operation is 
terminated. 

During a Type Out operation, the keyboard is locked to 
prevent loss of data in the event a key is accidentally 
pressed. 



20.10.3 Ty pewriter Console Switches and Indicat ors 

ible shows the function of each 
typ< 



The following table shows the function of each switch and indicator foi 
the console typewriter. uxcdi-or roi 



Name 



HIGH 

TEMP 



BUSY 



POWER ON 



TYPE 
DUMP 



TYPE 
LOAD 



REPEAT 



FINISH 



INTERRUPT 



ENCODE 
FUNCTION 



ILEAR 



Switch (S) 
Indicator (I) 



S & I 



S & I 



S & I 



S & I 



S & I 



S & I 



S & I 



Description 



This indicator glows when the ambient 
temperature within the typewriter cabinet 
exceeds 110°F. 



This indicator shows that the TYPE LOAD or 
TYPE DUMP switch has been pressed and the 
operation is in progress. 



This indicator shows that power is applied 
to the typewriter. 



This switch is in parallel with the TYPE 
DUMP switch on the main console and causes 
the computer to send data to the typewrit- 
er for print-out. It is a momentary con- 
tact switch that is illuminated until the 
last character in the block has been print 
printed or the CLEAR button' is pressed. 



This switch is in parallel with the TYPE 
LOAD switch on the main console and allows 
the computer to receive a block of input 
data from the typewriter. The TYPE LOAD 
indicator remains on until either the 
FINISH, REPEAT or CLEAR button is pressed, 
or until the last character of the block 
has been stored. If the program immedi- 
ately reactivates the typewriter, it may 
appear that the light does not go off. 



This switch is pressed during a Type Load 
operation to indicate that a typing error 
occurred. This switch deactivates busy 
sense line 10 (see PAUS instruction). If 
the computer does not respond, this light 
remains on. 



This switch is pressed during a Type Load 
operation to indicate that there is no 
more data in the current block. This 
action is necessary if the block that the 
operator has entered is smaller than the 
block defined by registers 23 and 33. 
This switch also deactivates busy sense 
line 09. If the computer does not respond, 
this light remains on. 



This switch is in parallel with the MANUAL 
INTERRUPT switch on the console and is 
used to manually interrupt the computer 
program. 



This switch enables the typewriter to 
send to storage the special function codes 
for backspace, tab, carriage return, 
upper-case shift, and lower-case shift. 



This switch clears the typewriter controls 
and sets the typewriter to lower case but 
does not cancel Encode Function. 



20.10.4 Character Codes 

The following table lists the internal BCD codes, typewriter print-out and 
upper- or lower-case shift that applies to the console typewriter. All 
character transmission between the computation section and the typewriter 
is in the form of internal BCD. The typewriter logic makes the necessary 
conversion to the machine code. 

Note: Shifting to upper case (57) or lower case (32) is not necessary 
except on keyboard letters where both upper and lower case is 
available. The standard type set for the 3192 has two sets of 
upper case letters and no lower case letters. This eliminates 
the need for specifying a case shift. 

Those characters that are strictly an upper or lower case character 
are not affected by the case currently selected. Case selection 
only affects those characters that may be printed in either upper 
or lower case. 



CONSOLE TYPEWRITER CODES 



i 




Internal 


Print-out 


Case 


BCD 
Code 


Q 


L 


00 


1 


L 


01 


2 


L 


02 


3 


L 


03 


A 


L 


04 


5 


L 


05 


6 


L 


06 


7 


L 


07 


8 


T 


10 


9 


L 


11 


+ 


U 


12 


= 


L 


13 


it 


U 


14 


: 


U 


15 


5 


L 


16 


? 


U 


17 


+ 


U 


20 


A 


U or L 


21 


B 


U or L 


22 


C 


U or L 


23 


D 


U or L 


24 


E 


U or L 


25 


F 


U or L 


26 


■G 


U or L 


27 


H 


U or L 


30 


I 


U or L 


31 


(Shift to LC) 




32 


. 


U or L 


33 


) 


U 


34 


i 


L 


35 


@ 


U 


36 


T 


L 


37 







Internal 


Print-out 


Case 


BCD 
Code 


. 


L 


40 


J 


U or L 


41 


K 


U or L 


42 


L 


U or L. 


43 


M 


U or L 


44 


N 


U or L 


45 





U or L 


46 


P 


U or L 


47 


Q 


U or L 


50 


R 


U or L 


51 


° (degree) 


U 


52 


$ 


U 


53 


* 


U 


54 


# 


U 


55 


% 


U 


56 


(Shift to UC) 




57 


(Space) 




60 


/ 


L 


61 


S 


U or L 


62 


T 


U or L 


63 


U 


U or L 


64 


V 


U or L 


65 


W 


U or L 


66 


X 


U or L 


67 


Y 


U or L 


70 


z 


U or L 


71 


& 


U 


72 


J 


U or L 


73 


( 


U 


74 


(Tab) 




75 


(Backspace) 




76 


(Carriage 




77 


Return) 







20.10.5 Input/Output Instructions 

20.10.5.1 Set Console Typewriter Input 



i lOWIiB* 


i !8PEMTIMJO0IFI?RS 


mm%% fieib 




1 L ' • 


CTI 










<;;:;,i 1 i a ..= :» 1 j!.» a n,^ 


.,,,,,:,,.,,,,„ 




Bits 00 - 11 should 
be loaded with zeros 



Description : This instruction^ like the TYPE LOAD switch, permits a 
block of data to be entered into storage as soon as the 
Type Load indicator lights. If a block of data smaller 
than the one defined by registers 23 and 33 is to be 
typed, the FINISH switch should be depressed when the 
typing is completed. If more data is entered than the 
defined block can hold, the excess data is lost. If a 
typing error occurs, the REPEAT button should be depressed, 
the typewriter input operation is terminated and the 
appropriate status bits (09 and 10) may be sensed with the 
PAUS instruction. 



Example : The below example illustrates initiating a typewriter 

INPUT. The INPUT data is to be stored in address INBUFF 
through INBUFF +12. 



ECHA 


INBUFF 


TAM 


23B 


INA 


13 


TAM 


33B 


CTI 





SET R.F. L0CA 23 T0 FCA 

SET R.F. L0CA 33 T0 LCA+1 
INITIATE TYPEWRITER INPUT 



U'CS 
INBUFF BSS,C 13 



20.10.5.2 Set Console Typewriter Output 



23 



18 17 12 11 



00 



77 


76 


'WH99&, 



Bits 00 - 11 should 
be loaded with zeros 



Description : This instruction, like the TYPE DUMP switch, causes the 
typewriter to print out the block of data defined by the 
character addresses in registers 23 and 33. 



Note 



The CTI and CT0 instructions are mutually exclusive. 
Any attempt to execute one while the other is being 
executed will be ignored by the computer. Typewriter 
busy should be checked before these instructions are 
used and before registers 23 and 33 are altered. 



20.10.5.2 (cont.) 



Example : The following example illustrates initiating a typewriter 
OUTPUT. The OUTPUT will be from address 0UTBUFF through 
0UTBUFF+15. 



ECHA 


0UTBUFF 


TAM 


23B 


INA 


16 


TAM 


33B 


CT0 





SET R.F. L0CA 23 T0 FCA 

SET R.F. L0GA 33 T0 LGA+1 
INITIATE TYPEWRITER 0UTPUT 



UCS 
0UTBUFF BSS,G 16 



20. 10. 5,. 3 Pause Instruction (as used with Console Typewriter Instructions) 



:§PrtlTM8 : 80OTtfS$ 

PAUS 



23 



18 17 15 14 12 11 



00 



Bits 00 - 11 should 
be loaded with zeros 



Description : This instruction allows the program to halt for a maximum 
of 40 ms if a condition ' excluding t vri ewriter— see note^ 
defined by the pause sensing mask exists. If a 1t l Tf appears 
on a line that corresponds to a mask bit that is set, the 
count in P will not advance. If the advancement of P is 
delayed for more than 40 ms, a reject instruction is read 
from address P + 1. If none of the lines being sensed is 
active, or if they become inactive during the pause, the 
program immediately skips to address P + 2. If an interrupt 
occurs and is enabled during a PAUS, the pause condition is 
terminated, the interrupt sequence is initiated and the 
address of the PAUS instruction is stored as the interrupted 
address. 

Note: If either bit 08, 09 or 10 (or any combination of these 

bits) is set and the sensed condition exists, a pause will 
not occur and the instruction at P + 1 is read up immediately. 
If these bits are set but the condition(s) does not exist, 
the program immediately skips to P + 2. For all other bits, 
the normal PAUS routine is followed. 



PAUSE Sensing Mask Table 



Mask 


Mask 






Bit 


Code 


Condition 


Notes 


00 


0001 


I/O channel Busy 


Channel Read or Write 


01 
02 
03 
04 
05 
06 


0002 
0004 
0010 
0020 
0040 
0100 


1 
2 
3 
4 
5 
6 


operation in progress, 
or the external Master 
Clear logic within the 
channel is set. 


07 


0200 


7 




08 


0400 


Typewriter BUSY 


Typewriter input or 


09 
10 
11 


1000 
2000 
4000 


Typwrtr NOT FINISH 
Typwrtr NOT REPEAT 
Search^Move control 


output in progress 
FINISH switch not depressed 
REPEAT switch not depressed 

S^SrCh ^r M^" ,T<i Anflffa f- -I r\in 






BUSY 


in progress 



20.10.5.3 (cont.l) 



Examples: i) This example initiates and waits until a typewriter OUTPUT 
is complete. 



ECHA 

TAM 

INA 

TAM 

CT0 

PAUS 

UJP 



0UTBUFF 
23B 
16B 
33B 

400B 
*-l 



SET R.F. L0CA 23 T0 FCA 

SET R.F. L0CA 33 T0 LCA+1 
INITIATE TYPEWRITER 0UTPUT 
WAIT UNTIL 0UTPUT IS C0MPLETE 



UCS 
0UTBUFF BCD,C 



16, THIS IS THE END 



ii) Study the following example and determine what it will do, 



PAUS 


400B 


UJP 


*-l 


ECHA 


INBUF 


TAM 


23B 


INA 


80 


TAM 


33B 


CTI 




PAUS 


400B 


UJP 


*-l 


ECHA 


CR 


TAM 


23B 


INA 


1 


TAM 


33B 


CT0 




FAUS 


400B 


UJP 


*-l 


ECHA 


INBUFR 


TAM 


23B 


INA 


10 


TAM 


33B 


CTI 





* 

INBUF 
CR 
INBUFR 



UJP 

BSS,C 

0CT 

BSS,C 



ELSE 

80 
-0 
10 



etc. 



It looks like the program will do an input, then a carriage 
return and then call for more input. If the first input is 
terminated by a REPEAT or FINISH, and 1) few or no characters 
were inputted or 2) if the operator is slow in getting his 
finger off the switch, then the second input will be termi- 
nated before he has a chance to type any further characters. 

Verify this for yourself by studying the actions listed on 
the next page. The key is that the CTI can be initiated 
during the 50msec interval following the end of a type-out 
as the PAUS 400B senses buffer busy not typewriter busy. 



20.10.5.3 (cont.2) 



Note: Some programs use the REPEAT and FINISH switches 
as self clearing sense switches. This use is 
possible but is not recommended except under 
controlled conditions. The reason for this will 
be evident when the actions of the REPEAT and 
FINISH switches and PAUS instruction are studied 
below. 

REPEAT or FINISH switch depressed 

Typewriter NOT busy and not in the 50msec interval 
following a type-out operation 

Action: Set REPEAT or FINISH status bit, turn on light 

Typewriter executing a type-out or in the 50msec 
interval following a type-out operation 

Action: None 

Typewriter waiting for type-in 

Action: Set REPEAT or FINISH status bit, turn on light 
and terminate type-in. 

End of 50msec interval at end of type-out operation and 
REPEAT or FINISH switch being held down 

Typewriter not busy. 

Action: Set REPEAT or FINISH status bit, turn on light 

Typewriter busy with new output 

Action: None 

Typewriter busy with type-in 

Action: Set REPEAT or FINISH status bit, turn on light 
and terminate type-in. 

At any time when the REPEAT or FINISH light is on and 
status bit set and the REPEAT or FINISH switch is being 
held down. 

REPEAT or FINISH being sensed by PAUS instruction 

Action: Clear REPEAT or FINISH status bit and 

turn off light. (Switch must be released 
and depressed again to reset) RNI at P+2, 
where otherwise it would be P+l. 



Exercise : Write a subroutine that will output a carriage return and 
then tab the console typewriter. Then initiate a type-in 
of 1 character and wait until that character is received 
or a NOT busy, repeat or finish condition arises. Clear 
repeat and/or finish if present. 



STUDENT NOTES 



INTERRUPTS 



21.1 INTERRUPTS USING CIC 



21.2 INTERRUPTS WITHOUT USING CIC 



21.3 I/O USING CIC 



21.4 INTERRUPT MASK REGISTER BIT ASSIGNMENTS 



21.5 CIT ASSIGNMENTS 



Chapter 



w 



21.1 INTERRUPTS USING CIC 

Description : There are twelve groups of conditions for which, when one or 

more of these conditions occur, the programmer may wish to jump 
to a special sequence of coding, and upon completion of that 
task, resume processing in his original task. Processing in 
this manner is called "interrupt processing". 

The twelve groups of conditions mentioned above are listed in 
the table "Interrupt Mask Register Bit Assignments 11 in Section 
21.4 at the end of this discussion. This register (IMR) is 
set by the programmer. 

In addition to the IMR, there are twelve flip-flops, each 
representing one of the conditions specified by the IMR. 
(Schematically, we may consider this as a 12-bit Interrupt 
Register.) When one of the 12 interruptible conditions occurs, 
the hardware sets the corresponding flip-flop in this Interrupt 
Register. If the corresponding bit has been set by the pro- 
grammer in the IMR (and the interrupt system is enabled), 
interrupt processing will take place. The programmer must 
have previously placed the address of his interrupt routine 
in the CIT table. 

Examp 1 e ; Add the integers in BUF thru BUF+99. If an arithmetic over- 
flow occurs, jump to a routine to process the sum using 
double-precision (48-bit) integer arithmetic. 



*ST0RE ADDRESS 

0F INTERRUPT R0UTINE AT CIT+7 

(SEE TABLE 21.5) 
*SET IMR F0R 0VERFL0W C0NDITI0N 
*ENABLE INTERRUPT SYSTEM 



EXT 


CIT 


0CT 


0,0 


UJP 


** 


ENA 


INTADD 


EN I 


7,1 


SWA 


CIT,1 


SSIM 


2000B 


EINT 





L00P 



ENA 





ENI 


99,1 


ADA 


BUF,1 


IJD 


L00P,1 


SHAQ 


_0/i 


ADAQ 


SUM 


STAQ 


SUM 



*ADDITI0N L00P 

*100 W0RD SUM IS GOMPLETE,. EXCEPT 
*ADD 2 4- BIT SUM IN *A* 

T0 48 -BIT SUM IN *SUM* 
*ALL D0NE 



UJP, I 



START 



* 








INTADD 


UJP 


** 






ENA 


INTADD 


1 




SWA 


CIT,1 


2 




ENI 


1,1 


3 




LDA 


CIT,1 


4 




SHAQ 


-24 


5 




X0A,S 


-0 


6 




ADAQ 


SUM 


7 




STAQ 


SUM 


8 




ENA 





9 




STA 


CIT,1 


10 




UJP, I 


INTADD 


11 



21.1 (cont.l) 

Discussion of START+1 thru START+5 in the Example 

Initialization to recognize an interrupt 

(1) the programmer must store the address of his interrupt 
routine in the lower 15 bits of the proper CIT table 
entry (See Section 2H5) and 

(2) the programmer must set the proper bit or bits in the 
IMR (See Section 21.4) and 

(3) the programmer must enable the interrupt system. 

Discussion of INTADD in the Example 

Processing the interrupt 

(1) and (2)* GIC replaced the lower 15 bits of CIT+7 with the 
address of ABNORMAL. If we expect to get another 
overflow interrupt, we must again place the address 
of our routine in CIT+7, (Location CIT+7 applies 
only to overflow interrupts, see Section 21.5) 
Upon entry to an interrupt routine, CIT+(b!) equals 
the CIT table location where the F*TA of an Interrupt 
Routine must be placed to process the next interrupt 
of the type currently being processed. 

(3)* and (4)* CIC stored the original contents (the "overflowed" 
sum) of the A register at CIT+1 and used the A 
register for its own purposes. We are merely re- 
loading the original A register contents at the 
time of overflow so that we may process the over- 
flow. 

(4)*, (5)*, (6)*, (7)* & (8)* are processing the overflow condition 
into a 48-bit true sum. 

(9)* and (10)* Since CIC will load the A register from CIT+1 be- 
fore returning to our original sequence, we must 
place into CIT+1 whatever quantity we desire to 
be in the A register upon re-entry into our original 
sequence. 

( n )* Returns us to CIC for housekeeping (explained later) 
before giving control to our original sequence. 

Discussion of the Function of CIC 

When an interruptible condition occurs, the Interrupt Register 
is compared to the IMR. If (a) any corresponding bits are set, 
and (b) the interrupt system has been enabled, then 

(1) the interrupt system is disabled, 

(2) the address of the instruction which would normally be 
executed next is stored in the lower 15 bits of absolute 
location 4, 

(3) an identifying code is stored in the lower 12 bits of 
location 5 and, 

(4) control is given to location 5. 

Here are the contents of locations 4, 5 and 6 under SCOPE. 

00004 UJP ** 

00005 N0P 

00006 UJP CIC 



'refers to card number in INTADD example 



21.1 (cont.2) 



Since the hardware gives control to location 5 (which is a no 
operation instruction), we see that a jump is made to CIC (Central 
Interrupt Control). CIC saves the contents of A, Q, B 1 , B 2 and B 3 
at CIT+1 thru CIT+5. Since an identifying code (showing what 
condition caused the interrupt) is set in the lower 12 bits of 
location 00005, CIC knows which entry in CIT contains the address 
of the programmers interrupt routine. 

CIC does a return jump to this location, and the programmer's 
interrupt routine (INTADD in this example) is executed. The 
interrupt routine does a UJP or UJP,I thru it's entry point 
to return to CIC when finished. 

CIC restores the five registers, clears the flip-flop which was 
set by the interruptible condition (arithmetic overflow in the 
example), enables the interrupt system, and does an indirect 
jump through location 00004. The indirect jump gives control back 
to the instruction which was orginally interrupted. 



21.2 INTERRUPTS WITHOUT USING CIC* 

If the programmer does not wish to use CIC to help in the pro- 
cessing of his interrupt, then at location 00006 he must store 
a jump to the address to which he wishes control to be given. 
In his interrupt routine, he must save and restore his registers 
(if his routine uses them) if he wishes them to have their 
original contents upon return to the main coding. He must also 
clear the flip-flop in the Interrupt Register (with an INCL 
instruction) which signalled the interruptible condition. His 
last two instructions should be: 

EINT 

UJP, I 4 

If the last instruction in the interrupt routine does not use 
an indirect reference to location 00004, the control may never 
return to the main progran. This is because after an EINT he is 
assured of being able to execute only one more instruction before 
the interrupt system can recognize another interrupt. Hence, if 
he has programmed for interrupt on more than one condition and 
another is present, the computer will interrupt again and the 
address portion of the jump instruction at location 00004 will 
be changed before it can be executed. Since it will be changed 
to 00004, the computer will stall on a jump to location 00004 
after completing the processing of the current interrupt. 

*Since CIC is essential for SCOPE 1/0, it is assumed that no 1/0 
will be done or that SCOPE isn't being used. 

23.3 1/0 USING CIC (See also Section 16.2.3) 

In programming for I/O interrupts using CIO, all the housekeeping 
is done by CIO. (The programmer does not EINT, SWA CIT-Hc, or set 
the IMR with an SSIM). CIO actually uses CIC in the same manner 
that we indicated, but the programmer does not have to attend to 
the details. 



Suppose that we wish to output 30 words from locations BUFF thru 
BUFF+29 onto logical unit 15. We wish to continue executing 
instructions while the output is going on. However, as soon as 
the output is finished, we wish to be "interrupted" and process 
a special sequence of code, then return to our original sequence, 



21.3 (cont.) 



Following is the code that will accomplish the task: 



EXT CI0 
START UJP ** 



ENTRY 



ENA 





STA 


BFRBUSY 


RTJ 


CI0 


02 


15,2 


UJP 


REJECT 


40 


BUFF 





30 





INT ADD 



SET BUFFER FLAG T0 BUSY 

G0 T0 CI0 T0 - 

WRITE WITH INTERRUPTS 0N LU 15 

WRITE REJECTED IF WE GET HERE 

START 0UTPUTTING FR0M L0CA *BUFF* 

0UTPUT 30 W0RDS 

WHEN INTRPT 0CCURS , G0 T0 INTADD 



SSH BFRBUSY NEED *BUFF* N0W, IS WRITE D0NE 
UJP *-l IF N0, L00P UNTIL FINISHED 

IF YES 3 C0NTINUE 



-r vrrp a nr» 



UJP, I 



START 



ENA,S 
STA 
UJP, I 

BFRBUSY 0CT 



-0 

BFRBUSY 

INTADD 

-0 



PR0GRAM ALL D0NE, EXIT T0 SC0PE 
ENTRY P0INT 0F INTERRUPT R0UTINE 



Interrupt Routine 
Special Sequence of Code 



SET BUFFER FLAG T0 N0T BUSY 
EXIT T0 MAIN C0DE VIA CIC 
+0 = BUSY, -0 = N0T BUSY 



21.4 INTERRUPT MASK REGISTER BIT ASSIGNMENTS 



' 1 

Mask Bit 

Positions 


Mask Codes (x) 


Interrupt Conditions Represented 


00 


0001 


I/O Channel (includes interrupts 
generated within the 
channel and external 


01 


0002 


equipment interrupts) 

1 


02 


0004 


2 


03 


0010 


3 


04 


0020 


4 


05 


0040 


5 


06 


0100 


6 


07 


0200 


7 


08 


0400 


Real-time clock 


09 


1000 


Exponent overflow/underflow 6c BCD faults 


10 


2000 


Arithmetic overflow & divide faults 


11 


4000 


Search/Move completion 



21.5 CIT ASSIGNMENTS 



Symbolic 






Location 


Content 


Explanation 


CIT+0 


Interrupt flag 


If +0, no interrupt occurred. 
If -0, interrupt occurred. 


+1 


(A) I 


Contents of these registers 


+2 


(Q) 


when last interrupt occurred. 


+3 


(Bl) 


>~ Registers are restored 


+4 


(B 2 ) 


from here on exit from 


+5 


(B3) 


CIC. 


+6 


Real Time Clock 




+7 


Arithmetic Overflow 


Initially contains UJP ABNORMAL, 


+8 


Divide Fault 


Address of user interrupt routine 


+9 


Exponent Overflow 


»- stored in CIT by user main 


+10 


BCD Fault 


program when the corresponding 


+11 


Search/Move 


interrupt is selected. 


+ 12 


Manual Interrupt 




+13 


Associated Processor 
Interrupt 




+ 14 


Channel 


Initially contains UJP ABN0RMAL. 


+15 


Channel 1 


Address is set by CIO when 


+ 16 


Channel 2 


interrupt is selected. Table is 
extended for each pair of 


+ 17 


Channel 3 


+18 


Channel 4 


channels added to the hardware 


+ 19 


Channel 5 


configuration*. 


+20 


Channel 6 




+21 


Channel 7 


________—— — __———— _ ^_— — 



* The Central Interrupt Table (CIT) length varies from 
15 to 21 entries and is dependent on the number of 
channels present in the system. The length of the 
table is specified at the time CIC is assembled under 
COMPASS prior to doing a PRELIB (Prepare library tape) 

of scope'. 



SAMPLE COMPASS PROGRAMS 



SEQUENCE, 001 
EXAMPLES 

EXAMPLE 20 (AVERAGE) 
EXAMPLE 19A(CR2PR) 
EXAMPLE 21 (CODE) 
EXAMPLE 22 (MEQ.TEST) 
EXAMPLE 23 (TY.OUT) 
EXAMPLE 24 (DEMO) 
EXAMPLE 25 (MTDRIVER) 
MAC 

EXAMPLE 26 (COPY) 
CIC VERSION SI 0,0 
MTMTCIO 
TYPE IN 
SORT 
TYPEOUT 
FLOATF 
CRDTP 
MTMT 
CVTBCDB 
CVTBBCD 



AIT 

A1B 

A9B 

A11T 

A12B 

A14T 

A15B 

A17T 

A22T 

A25T 

A27T 

A29B 

A32T 

A34T 

A35B 

A37T 

A38B 

A40T 

A42T 

A44T 

A45B 



A9T 

A10B 

A12T 

A13B 

A15T 

A16B 

A21B 

A24B 

A26B 

A29T 

A3 IB 

A33B 

A35T 

A36B 

A38T 

A39B 

A41B 

A43B 

A45T 

A46B 



SEQUENCE, 002 
IDC 

- Load/ Snap/Run - 

- Memory Map - 

- Snap Number 1 & 2 - 



A47T 

A47B - A48T 

A48B 

A49T 

A50T - A50B 



SEQUENCE, 003 and OCC's 

- Memory Map - 

- Memory Dump - 



A51T 
A51B 
A52B 



Appendix 



A-l 



SEQUENCEtOOl 

JOtttt.. 

COMPASS.LtH 



COMPASS-32 (2.1) 



EXAMPLES 



11/P1/66 PAQE I 



UNDEFINED SYMBOLS 
SAM 
SYM 
SYMBOL 



MULTIPLY-OEFINED SYMBOLS 
GEORGE 



EXTERNAL SYMBOLS 
BCDBOXS 
FDPBOXS 



LENGTH OF SUBPROGRAM 00372 
LENGTH OF COMMON 00000 

LENGTH OF DATA 00000 



A-2 



COMPASS-32 



examples 

this is 



A LISTING OF THE CDC 3200 INSTRUCTION SET 
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JEFINITION OK OPERATION rOOE MODIFIERS — — — 



EO EQUAL 

NE NOT EQUAL 

SE SWEATER THAN OR EQUAL JO 

LT LESS THAN 

I INDIRECT ADDRESSING 

S SISN EXTENSION 

INT INTERRUPT 

B BACKWARD 

H HALF ASSEMBLY OR DISASSEMBLY 

N NO ASSEMBLY OR DISASSEMBLY 



»••••«•»•< 



DEFINITION OF TERMS AND SYMBOLS 

A THE *A* REGISTER 

THE *Q* REGISTER 

AU 48 BIT REG • (A AND Q COMBINED RESPECTIVELY) 

<JA 48 BIT REG i (0 AND A COMBINED RESPECTIVELY) 

E THE 48 BIT *l* REGISTER 

EL LOWER 24 BITS OF *l* 

EU UPPER 2* BITS OF #E# 

EO THE 52 BIT (13 CHAR) *E DECIMAL* REGISTER. SAME AS 

*E* BUT EXTENOED FROM 48 TO 52 BITS. 

96 BIT REG . (A,Q AND E COMBINED RESPECTIVELY) 

ANY ONE OF THE THREE INDEX REGISTERS 

INDEX REGISTER ONE ONLY 

INDEX REGISTER TWO OmLY 

INDEX REGISTER THREE ONLY 

* BIT tO* REGISTER 

INTERRUPT MASK REGISTER 



AUE 

B 

Bl 

H2 

B3 



I MR 



M 15 BIT WORD ADDRESS 

R 17 BIT CHARACTER ADDRESS 

FSCA FIRST SOURCE CHARACTfR ADDRESS 

FOcA FIRST DESTINATION CHARACTER ADDRESS 

V 6 BIT REGISTER FILE aOORfSS 

Y 15 BIT OPERANO 

C >s BIT SEARCH CHARACTFH 

FL 4 BIT OPERAND (BCD FIELD LENGTH) 

P CURRENT INSTRUCTION aDURfSS AS INDICATED BY THE P F 

( ) CONTENTS OF 

(M) 2* BIT CONTENTS OF MEMORY LOCATION M 

(M,M*1) 4ft BIT CONTENTS OF MfM LOCS M AND M*, RESPECTIVELY 

IX) 6 BIT CONTENT OF MEMORY CHARACTER LOCATION H 

(V) 24 HIT CONTENTS OF RfG FtLE LOCATION V 



COMPASS-32 
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READ NEXT INSTRUCTION 

*HERE DATA IS BEING STORED INTO PART OF A MEMORY 
LOCATION i THE REMAINDER OF THAT LOCATION REMAINS 
UNCHANGED 

ALL POSSIBLE OPERATION MODIFIERS ARE SHOWN WITH EACH 

MNEMONIC CODE , SEPARATED BY (.). 

THERE IS NO CMDEK t >»H£R? MULTIPLp MnDFiERS ARE 

POSSIBLE. 

THE FOLLOWING MODIFIERS ARE OPTIONAL AND CAN BE 

OHOPPED BY ELEMINATING BOTH THE MODIFIER AND THE 

PRECEDING COMMA. 



I t S 



INT 



B » H 



ON ALL CONDITIONAL J'JMP AND SKIP INSTRUCTIONS • 
IF THE CONDITION IS mOT MET THEN RNI P*l 



COMPASS-32 
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EXAMPLES 

3 2 INSTRUCTION SET 
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»••»»«•*•« 



LOAD CLASS 



00000 
00001 
00002 
00003 
00004 
00005 
00006 
00007 
00010 



20725252 20 1 
21725252 21 1 
22425253 22 1 
23425253 23 1 
24725252 24 1 
25725252 25 1 
26725252 26 1 
27725252 27 1 
54725252 54 1 



25252 
25252 
05252 
05252 
25252 
25252 
25252 
25252 
25252 



loa»i 

LQQiI 

LACH 

LOCH 

LCa.I 

LDaU.I 

LCa«J,J 

LOLtl 

LDHI 



M,B 
M,B 
R.Bl 
R.82 

M,Q 
H t B 
M,B 
M.B 
M,B 



23-06 CLEARED 
23-06 CLEARED 



(M) TO A 

(M) TO Q 

(K) TO A 05-00 

(R) TO 05-00 

IM) COMPLEMENT To A 

(M.M+1! TO AQ 

<M,M*1) COMPLEMENT TO AQ 

(M)lM(Q) TO A . M AND Q UNCHANGE 

(M 14-00) TO B 



STORE CLASS 



00011 
00012 
00013 
00014 
00015 
00016 
00017 
00020 



00021 
00022 
00023 
00024 



00026 
00027 
00030 
00031 



00032 
00033 
00034 
00035 



40725252 40 1 
41725252 41 1 
42425253 42 1 
43425253 43 1 
44725252 44 1 
45725252 45 1 
46725252 46 1 
47725252 47 1 



30725252 30 
31725252 31 
50725252 50 



51725252 51 1 



32725252 32 1 
33725252 33 1 
56725252 56 1 
57725252 57 1 



60725252 60 1 
61725252 61 1 
62725252 62 1 
63725252 63 1 



25252 
25252 
05252 
05252 
25252 
25252 
25252 
25252 



25252 3 
25252 3 
25252 3 
25252 3 



00025 3*725252 34 1 25252 3 



2S252 3 
25252 3 
25252 3 
25252 3 



25252 3 
25252 3 
25252 3 
25252 3 



STAiI M,B 

STo.I M,B 

SACH R,B2 

SQcH RiBl 

SWA.I M,B 

STaQ.I M,B 

SChA.I M.B 

STl.I M,8 

24 BIT ARITH CLASS 

ADA»I M.B 

SBa.I M.B 

MUa.I M.B 

DVA.I M.B 

RAn.I M,B 



AOaQ.I 
SBaQ.I 
MUa'-J.! 
DVaU.I 



FAd.I 
FSB. I 
FMu.I 
FOv.I 



(A) TO M 

IU) TO M 

(A 05-00) TO R 

ttt 05-00) TO R 

(A 14-00) TO M 14-00 

(AQ) TO M.M*i 

(A 16-00! TO M 16-00 

<8> TO M 14-00 



(A)*(M! TO A 
(A)-(M) TO A 
(A)«(M> TO Q« 
(AQ)/(M) TO A 



(A)*(M) TO M 



REMAINDER TO Q 
I IS UNCHANGED 



48 BIT ARITH CLASS 
,8 



(AQ)*(M,M*1) TO AQ 
(AQ)-(M,M*1) TO AQ 
(AQ)»(M,M*1) TO AQE 
(AQe)/(m,m*d To AQ, REMOR TO E 



FLOATING POINT ARITH CLASS 



M.B 
M,B 

M,B 
M,8 



FP(AQ) ♦ FPIM,M*1) TO AQ 

FP(AQ) - fPIM,M*11 TO AQ 

FP(AQ) • FP(M,M*l) TO AQ 

FP(AQ) / FP(M,M»1) TO AQ 
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00036 
00037 
00040 
M041 
00042 



64425253 64 1 
65425253 65 1 
66425253 66 1 
67425253 67 1 
70300014 70 



05252 
05252 
05252 
05252 
00014 



00043 70700012 70 1 00012 3 

00044 70625252 70 I 25252 2 

00045 70425252 70 1 25252 

00046 70525252 70 1 25252 1 



00047 


53300000 


53 





00000 


3 


00050 


53700000 


53 


1 


00000 


3 


00051 


53010077 


53 





10077 





00052 


53410077 


53 


1 


10077 





00053 


53020077 


53 





20077 





00054 


53420077 


53 


1 


20077 





00055 


53330077 


53 





30077 


3 


00056 


53730077 


53 


1 


30077 


3 


00057 


53040000 


53 





40000 





00060 


53340000 


53 





40000 


3 


00061 


53740000 


53 


1 


40000 


3 


00062 


55100000 


55 





00000 


1 


00063 


55500000 


55 


1 


00000 


1 


00064 


55200000 


55 





00000 


2 


0006S 


55600000 


55 


1 


00000 


2 


00066 


55300000 


55 





00000 


3 


00067 


55700000 


55 


1 


00000 


3 



LOE 
STF 
ADF 
SBF 
SFF 

SET 

EOj 

EZjtEQ 

EZj.LT 



TI« 
TAI 
TMQ 
TQM 
TMa 
TAm 
TMl 
TIM 

AUa 
AlA 
IAI 



ELQ 
QE L 
EUa 
AEu 
EAQ 
AQf 



BCD CLASS 

FCA.B1 (FCA THRU FCA*(D)_1) TO ED RI<?HT JUSTIFIED 

FCA.B2 (ED) TO FCA THRU FCA*(D)-1 . SIGHT JUSTIFIED 

FCA.B3 <ED)*(FCA THRij FC**(D)-1) TO FD 

FCA. S3 (ED)-(FCA THR(j FCa*(D)-1) TO FO 

K.B SHIFT ED . IC DIGITS LEFT OR RIGHT (END OFF) 

FL Fl TO D 

M RNI M IF ED OVERFLOW CHARACTER IS NONZERO 
M RNI M IF ED CONTAINS ZERO 
M RNI M IF ED IS NEGATIVE 

24 BIT INTER-REGISTEH TRANSFER CLASS 

A 23-15 CLEARED 



(8! 


TO A 14- 


10 


(A 


14-00) TO 


B 


(V) 


TO Q 




(Q) 


TO V 




(V) 


TO A 




(A) 


TO V 




(V 


14-00) TO 


a 


(B) 


TO V 14- 


10 


(A) 


»(Q) TO A 




(A) 


♦ (B) TO A 




(A) 
EH 


»(B> TO a 
TRANSFER 




(EL) TO Q 




(Q) 


TO EL 




(EU 


) TO A 




(A) 


TO EU 




(E) 


TO AQ 




(AQ 


TO E 





V 23-15 CLEAREO 



COMPASS-32 
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EXAMPLES 




00070 


14000000 14 


00000 


NOP 


00071 


0002&252 00 


25252 


HUT 


00072 


77770000 77 1 


70000 3 


ucs 



A-4 
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00073 01725252 01 1 25252 3 
0007* 00725252 00 1 25252 3 



STOP AND JUMP CLASS 



M.8 



RTJ 



00075 


00125252 


00 





25252 


1 


SJl 


M 




00076 


00225252 


00 





25252 


2 


SJ2 


M 




00077 


00325252 


00 





25252 


3 


SJ3 


M 




00100 


00425252 


00 


1 


25252 





SJ4 


M 




00101 


00525252 


00 


1 


25252 


1 


SJ5 


M 




00102 


00625252 


00 


1 


25252 


2 


SJ6 


M 




00103 


03025252 


03 





25252 





AZj.EQ 


M 




0010* 


03125252 


03 





25252 


1 


AZj.NE 


M 




00105 


03225252 


03 





25252 


2 


AZj.GE 


M 




00106 


03325252 


03 





25252 


3 


AZjtLT 


M 




00107 


03425252 


03 


1 


25252 





AUj.EQ 


M 




00110 


03525252 


03 


1 


25252 


1 


AUj»NE 


M 




00111 


03625252 


03 


1 


25252 


2 


AOjtGE 


M 




00U2 


03725252 


03 


1 


25252 


3 


AQjtLT 


M 




00113 


02325252 


02 





25252 


3 


UI 


M,8 


IF (B) NE 


00114 


02725252 


02 


1 


25252 


3 


Un 


M,B 
SKIP 


IF (8) NE 
CLASS 



00 NOTHING 

STOP. RNI M 
STOP, RNI P*l 

RNI M 

<P> TO M 14-00 , RNI M*l 



RNI 
RNI 
RNI 
RNI 
RNI 
RNI 



IF KEY 
IF KEY 
IF KEY 
IF KEY 
IF KEY 
IF KEY 



IS SET 
TS SET 
TS SET 
TS SET 
TS SET 
TS SET 



RNI M IF (A) EO ♦ OR - ZERO 

RNI M IF <A) NE ♦ OR - ZERO 

RNI M IF (A) POSITIVE 

RNI M IF (A) NEGATIVE 

RNI M IF (A) EO (0) 

RNI M IF (A) NE (0) 

RNI H IF (A) GE (Q) 

RNI M IF (A) LT (Q) 

lH)*l TO B AND RNI M. OW RNI P*l 

<R)"1 TO B AND RNT M. OH RNI P«l 



ONLY THE LOWER 15 BITS OF A OR 



WITHOUT SIGN EXTENSION 

ARE COMPARED WITH Y. 

WITH SIGN EXTENSION , BIT 14 OF Y IS EXTENDED THRU BIT 23 

MAKING Y 24 BITS FOR COMPARISON WITH ALL OF A OR Q. 



00115 04412345 04 1 

00116 04512345 04 1 

00117 04312345 04 

00120 04012345 04 

00121 05*12345 05 1 

00122 05512345 05 1 

00123 053123*5 05 



00124 
00125 



10712345 10 1 
10312345 10 



12345 
12345 1 
12345 3 
12345 

12345 
12345 1 
12345 3 

12345 3 
12345 3 



ASE.S 


Y 


ascts 


Y 


ISf 


Y 


ISF 


Y 


ASQ.S 


Y 


OSG.S 


Y 


ISG 


Y 


ISO 


Y 


ISI 


Y 



RNI P*2 IF (A) EQ Y . OW RNI P*l 

RNI P*2 IF (0) FO Y , OW RNI P*l 

RNI p«2 IF <B) FQ Y , Ow RNI P*l 

RNI P*2 IF Y EO • OW RNI P*l 

RNI P*2 IF (A) GE Y t OM RNI P*l 

RNI P*2 IF (o) fiE Y . OW RNI P*l 

RNI P«2 IF (R) GE Y . OW RNI P*l 



if (8) eq y Clear b and rnj p*2. 
if (b) eq y clear b and rni p*2, 

18)4-1 TO 8 AND RNl P*\ 
(B)-l TO B ANO RNf P»l 



OTHERWISE 
OTHERWISE 



C0MPASS-J2 
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SHIFT CLASS 



POSITIVE SHIFT COUNT (K) INDICATES LEFT SHIFT. ALL LEFT 
SHIFTS ARE END AROUND. 

NEGATIVE SHIFT COUNT (K) INDICATES RIGHT SHIFT. ALL RIGHT 
SHIFTS ARE ENO OFF KITH SIGN EXTENDED. 



00126 
00127 
00130 


12300014 
12700014 
13300014 


12 

12 1 

13 


00014 3 
00014 3 
00014 3 


SHA 
SHiJ 
SHAW 


K.B 
K.B 
K.B 


00131 


13700014 


13 1 


0001* 3 


SCaU 


K,8 

enter class 



SHIFT (A) LEFT nR RI6HT K BITS 

SHIFT (0) LEFT OR RIGHT K BITS 

SHIFT (AQ> LFFT OR RIGHT K BITS 

SCALE (AO) 



WITHOUT SIGN EXTENSION , THE UPPER BITS OF A TOR Q ARE CLEARED. 
WITH SI6N EXTENSION , BIT 1* OF Y (BIT 16 OF R) IS EXTENDED 
MAKING Y OR R ?4 BITS FOR ENTRY INTO ALL OF A OR St, 



00132 14*12345 14 1 12345 

00133 14512345 14 1 123*5 1 
0013* 1*3123*5 1* 123*5 3 



ENAiS 
ENO.S 
ENi 



Y To A 1*-00 

Y To l*-00 

Y To 8 



INCREASE CLASS 

WITH OR WITHOUT SIGN EXTENSION . Y WILL BE TREaTEO AS A 2* BIT 

VALUE WHEN ADOED TO A OR 0. 

WITHOUT SIGN EXTENSION , BITS ?3-lS OF Y WI L L BE ZERO. 

WITH SIGN EXTENSION , BIT 1* OF Y IS EXTENDED THRU BIT 23 

MAKING Y A 24 BIT VALUE. 

IF Y IS A NEGATIVE VALUE , THE REGISTER WILL 8F DECREASED BY 
THaT AMOUNT. I MUST USE SIGN £XT IN THIS CASE FOH A AND 0) 



00135 15412345 15 1 123*5 

00136 155123*5 15 1 123*5 1 

00137 153123*5 15 123*5 3 



INA.S 


Y 


INQ.S 


Y 


INI 


Y,B 



INCREASE <A) BY Y 
INCREASE (Q) BY Y 
INCREASE (B) BY Y 



• 
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LOGICAL INSTRUCTIONS WITHOUT STORAGE REFERENCE ' 














*1TH OR WITHOUT SIGN EXTENSION • Y IS TREATED 4S A 2» BIT 














VALUE. 


















WITHOUT SIGN EXTENSION , 3ITS ?3-lS OF Y ARF ZFROS. W 














*1TH SIGN EXTENSION , bIT 14 


OF Y TS EXTENDED THRU BIT 23 














MAKING Y 


A 24 HIT VALUE FOR 


THF OPFRATION. 




00140 


16412345 


16 


1 


12345 


XOA.S 


Y 


SC (A) BY Y 




001*1 


16512345 


16 


1 


12345 1 


XOqiS 


Y 


SC <Q> BY Y • 




00142 


16312345 


16 





12345 3 


xoi 


YtB 


SC <8> RY Y 




00143 


17412345 


17 


1 


12345 


ANA.S 


Y 


LM (A) BY Y • 




00144 


17512345 


17 


1 


12345 1 


ANQiS 


Y 


LM (Q) BY Y 




00145 


17312345 


17 





12345 3 


ANT 


Y,B 


LM (B) BY Y 
















LOGICAL INSTRUCTIONS WITH STORAGE REFERENCE 




00146 


35725252 


35 


1 


25252 3 


SSa.I 


M,B 


SS (A) BY (M) • 




00147 


36725252 


36 


1 


25252 3 


SCa.I 


M,B 


SC (A) BY (M) 




00150 


37725252 


37 


1 


25252 3 


LPA»I 


M,6 

BUFFERED SEARCH 


LM (A) BY (M) _ 
AND MOVE CLASS 




00151 


71425261 


71 


1 


05254 1 


SrtcEtINT 


C.FCA,LCA*1 


SEARCH (FCA THRU LCA) FOR ES C 9 




00152 


23025253 


23 





05252 3 










00153 


01000151 


01 





P00151 


UJP 


»-2 


REJECT INSTRUCTION 




00154 


71425261 


71 


1 


05254 1 


SHCN.INT 


C.FCA,LCA*1 


SEARCH (FCA THRU LCA) FOR NE C • 




00155 


23425253 


23 


1 


05252 3 










00156 


01000154 


01 





P00154 


UJP 


»-2 


REJECT INSTRUCTION _ 




00157 


72425653 


72 


1 


05352 3 


MOvE.lNT 


FL.FSCA.FDCA 


MOVE (FSCA THRU FSCA*FL-1> TO • 




00160 


05025253 


05 





05252 3 






FUCA THRU fdca+fl-i 




00161 


01000157 


01 





P00157 


UJP 


»-2 


REJECT INSTRUCTION • 
















STORAGE TEST CLASS 




00162 


06225252 


06 





25252 2 


MEO 


M, INTERVAL 


MASKED EQUALITY SEARCH 




00163 


07225252 


07 





25252 2 


MTH 


M, INTERVAL 


MASKED THRESHOLn SEARCH 




00164 


10025252 


10 





25252 


SSh 


M 


STORAGE TEST AND SHIFT • 




00165 


52725252 


52 


1 


25252 3 


CPR.I 


M,B 


COMPARE (M) WITH (A) AND (Q) 




COMPASS-32 


(2.1) 






EXAMPLES 




INPUT / OUTPUT 
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00166 


77067007 


77 





67007 


CON 


CC.CH 


CONNECT TO I/O PQUIPMENT 




00167 


01000166 


01 





P00166 


UJP 


*-l 


REJECT INSTRUCTION 




00170 


77160022 


77 





60022 1 


SEL 


FCtCH 


SELECT FUNCTION ON I/O EQUIPMENT • 




00171 


01000170 


01 





P00170 


UJP 


• -1 


REJECT INSTRUCTION 




00172 


73025261 


73 





05254 1 


INPC.lNTi 


8.H CH»FCAtLCA*l 


CHAR AORS INPUT TO STORAGE • 




00173 


63425253 


63 


1 


05252 3 










00174 


01000172 


01 





P00172 


UJP 


•-2 


REJECT INSTRUCTION 




00175 


73400000 


73 


1 


00000 


INACINT 


CH 


CHAR ADRS INPUT TO A 




00176 


60400000 


60 


1 


00000 










00177 


01000175 


01 





P00175 


UJP 


•-2 


REJECT INSTRUCTION 




00200 


74025322 


74 





25322 


INPW.lNTi 


3iN CHiFWAiLWA»l 


WORo ADRS INPUT TO STORAGE 




00201 


63425252 


63 


1 


25252 










00202 


01000200 


01 





P00200 


UJP 


•-2 


REJECT INSTRUCTION • 




00203 


74400000 


74 


1 


00000 


INA*tlNT 


CH 


WORD ADRS INPUT TO A # 




00204 


60400000 


60 


1 


00000 










00205 


01000203 


01 





P00203 


UJP 


•-2 


REJECT INSTRUCTION 




00206 


75025261 


75 





05254 1 


OUTC.INT, 


B,M CH.FCA.LCA+1 


CHAR AORS OUTPUT FROM STORAGE 




00207 


63425253 


63 


1 


05252 3 










00210 


01000206 


01 





P00206 


UJP 


•-2 


REJECT INSTRUCTION 




00211 


75400000 


75 


1 


00000 


OTACilNT 


CH 


CHAR ADRS OUTPUT FROM A 




00212 


60400000 


60 


1 


00000 










00213 


01000211 


01 





P00211 


UJP 


•-2 


REJECT INSTRUCTION • 




00214 


76025322 


76 





25322 


OUTC.INT. 


B.N CH»FWAtLWA*l 


WORD ADRS OUTPUT FROM STORAGE • 




00215 


63425252 


63 


1 


25252 










00216 


01000214 


01 





P00214 


UJp 


*-2 


REJECT INSTRUCTION 




00217 


76400000 


76 


1 


00000 


OTAW.lNT 


CH 


WORr) ADRS OUTPUT FROM A 




'00220 


60400000 


60 


1 


00000 










00221 


01000217 


01 





P00217 


UJP 


•-2 


REJECT INSTRUCTION 




00222 


77750000 


77 


1 


50000 3 


CTl 




CONSOLE TYPEWRITER INPUT 




00223 


77760000 


77 


1 


60000 3 


CTO 




CONSOLE TYPEWRITER OUTPUT 



A-5 





COMPASS-32 


(2.1) EXAMPLES 




ll/?l/66 PAGE in • 














SENSING AND COPY CL*SS 




00224 


77260000 77 60000 


2 




copy 


CH COPY EXTERNAL STATUS AND IMR TO A 




00225 


77360000 77 60000 


3 




CInS 


CH CnPY INTERNAL STATUS ANO IMR TO A 




00226 


77267777 77 67777 


2 




EAS 


XtCH SENSE EXTERNAL STATUS • 




00227 


77367777 77 67777 


3 




INS 


XtCH SENSE INTERNAL STATUS 




00230 


77467777 77 1 67777 







ints 


X.CH SENSE INTERRUPT 




00231 


77607777 77 1 07777 


2 




PAuS 


X PAUSE # 
CONTROL CLASS 




00232 


77507777 77 1 07777 


1 




INCL 


X INTERRUPT CLEAR 




00233 


77517777 77 1 17777 


1 




IOCL 


X INPUT/OUTPUT CLFAR 




00234 


77710000 77 1 10000 


3 




SFpF 


SET FLOATING POINT FAULT 




00235 


77720000 77 1 20000 


3 




S8CO 


SET BCD FAULT 
INTERRUPT CLASS 




00236 


77527777 77 1 27777 


1 




SSlM 


X SELECTIVELY SET IMR • 




00237 


77537777 77 1 37777 


1 




SClM 


X SELECTIVELY CLEAR IMR 




00240 


77730000 77 1 30000 


3 




OInT 


DISABLE INTERRUPT SYSTEM • 




00241 


77740000 77 1 40000 


3 




EInT 


ENABLE INTERRUPT SYSTEM 


• 


00242 


11*25253 11 1 05252 


3 




EChA.S 


R R To A 16-00 • 


#- 


00243 


77570000 77 I 70000 


1 




I ApR 


INTERRUPT ASSOCIATEO PROCESSOR 










BIT 


COOE sSIM 
SCIM 


INCL INTS IOCL PAUS INS • 










00 


0001 CH 


CH LINE CH CH o BUSY PARITY ERR ON CH X 










01 


0002 CH 1 


CH 1 LINE 1 CH 1 CH 1 BUSY CH X BUSY READING • 










02 


0004 CH 2 


CH 2 LINE 2 CH 2 CH ? BUSY CH X BUSY URITlNG 










03 


0010 CH 3 


CH 3 LINE 3 CH 3 CH i BUSY FXT REJECT ON CH X ^ 










04 


0020 CH 4 


CH 4 LINE 4 CH 4 CH 4 BUSY NO »ESP REJ ON CH X • 










05 


0040 CH 5 


CH 5 LINE 5 CH 5 CH 5 RUSY • ILLEGAL WRITE 










06 


0100 CH 6 


CH 6 LINE 6 CH 6 CH A BUSY CH X PRESET CON/SEL _ 










07 


0200 CH 7 


CH 7 LINE 7 CH 7 CH 7 BUSY INTERNAL INT ON CH X • 










08 


0400 REAL 


TIME CLOCK INT TY TY RUSY »EXP OVFLM FAULT 










09 


1000 »EXP OVFLW/BCO FAULT — — NOT FINISH «ARlTH OVFLW FAULT _ 










10 


2000 »ARITH OVFLW/OIV FAULT NOT REPEAT •DIVIOE FAULT • 










11 


4000 SEARCH/MOVE COMPLETE S/M S/M BUSY »BCO FAULT 


! 








• 


INTERNAL FAULTS CLEARED BY SENSING • 




COMPASS-32 


(2.1) ( 


:aa 


MPLES 
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ASSEMBLY OF CONSTANTS • 




0024+ 


ooooooo; 






OCT 


l ! 2«-2«50 5 -77 




00245 


00000002 












00246 


77777775 












00247 


00000050 












00250 


77777700 












00251 


00000001 






OEc 


l,2,50i-50,99,987654 




00252 


00000002 












00253 


00000062 












00254 


77777715 












00255 


00000143 












002S6 


03611006 












00257 


00000000 






OEcO 


1,-1, 98,-1. ,98. ,9. 8 




00260 


00000001 












00261 


77777777 












00262 


77777776 












00263 


00000000 












00264 


00000142 












00265 


57763777 












00266 


77777777 












00267 


20076100 












00270 


00000000 












00271 


20044714 












00272 


63146315 












00273 


44256262 






BCD 


2. MESSAGE 




00274 


21272560 












00275 


442562 






BCO.C 


3.MES • 




002753 


62 






BCotC 


5, SAGE 




00276 


21272560 












00277 


7730*643 




HOLMSG VFo 


06/77, H18/HOL,O9/0,Ai5/HOLMSG,C24/HOLMSG • 




00300 


00000277 












00301 


00001374 








STORAGE RESERVATION 




00302 






TOM 


BSS 


3 • 




00305 






TOMC 


BSs.C 


3 




003053 






TOMC] 


BSSiC 


1 — 




00306 


20000302 20 P00302 







LDA 


TOM 




00307 


22001424 22 PQ0305 







LACH 


TOMC 




00310 


22001427 22 P00305 


3 




LACH 


TOMC1 • 



A-6 



A-7 



COMPASS-32 



00311 
00312 
00313 
0031* 
00315 



00321 
00322 
00323 
00324 
00325 
00326 



20000012 20 

20000010 20 

200777*0 20 

20000001 20 

20000025 20 



00012 

00010 

777*0 

00001 

00025 
00025 



00316 20000317 20 

00317 20000321 20 
00320 20000317 20 



20000361 20 
25000362 25 
2500036* 25 
20000360 20 
25000366 25 
20000357 20 



SYMRl 
SYM82 



) P00317 
) POO 321 TEMP 
) P00317 
00317 TEMPI 



P00361 
P00362 
P0036* 
P00360 
P00366 
P00357 



00327 25000370 25 P00370 



00330 20000330 20 P00330 

00331 20000332 20 P00332 

00332 20000330 20 P00330 

00333 20077777 20 77777 



LOA 
LDA 
LUA 
LUA 
LUA 
EUU 



LDA 
LDa 
LOa 
EQU 



LOa 

ldau 

lOau 

LDA 
LDaQ 
LDA 
LOaQ 



LDA 
LDA 
LDA 
LDA 
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ADDRESSING MODES 
ABSOLUTE 

10 

108 

-378 

SYMB2-SYM81 

ADRS 

258 



TEMP 
TEMP*2 
TEMPI 
TEMP 



RELOCATABLE 



LITERALS 



=D9 

=209 

■ 209. 

•077777777 

*207373737373737373 

xHABCO 

=2HARCDEF3H 



»»1 
»-2 



SPECIAL" CHARACTERS 



INTERCHANGE OF tfORD AND CHARACTER ADDRESSES 



0033* 
0033* 
0033*3 

0033* 2000033* 20 PQ033* 

T 00335 2000033* 20 P0033* 

00336 22001560 22 P0033* 



HOrtQADRS EQU 
CHARADR1 EUUtC 
CHARADR2 EUIJ»C 



LDa 
LACH 



CHARADR1 
CHARADR2 
dOROAORS 



TRUNCATION ERHOP 





EXAMPLES 






25252 


ADDRESS 


EUlJ 


252528 


25252 


M 


EUIJ 


ADDRESS 


052523 


R 


EUU»C 


"♦l 


00003 


8 


EUlJ 


3 


00001 


81 


EUii 


1 


U0002 


82 


EUlJ 


? 


00003 


93 


Eu'j 


i 


052523 


FCA 


EUll.C 


A 


0525* 


LCA 


EUU.C 


^♦5 


oonl* 


K 


EUlJ 


12 


00077 


V 


EUU 


778 


123*5 


Y 


Eun 


123*53 


053523 


FuCA 


EQlMC 


FCA*?56 


052523 


FSCa 


EUtJ.C 


FCA 


00012 


FL 


EUlJ 


12B 


00006 


CH 


Euij 


6 


25252 


FNA 


EUij 


VI 


25321 


L«A 


EUu 


M*39 


07777 


X 


EUU 


7777R 


07007 


cc 


Euij 


7007H 


00022 


FC 


EUU 


22B 


00002 


INTERVAL 


Euu 


2 


00023 


C 


EUU 


?38 
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SYMBOL EQUATIONS 





9 COMPASS-32 


(2.1) 




EXAMPLES 








n/71/66 page u # 


















COMPASS ASSEMBLY 


ERRORS 




A 00337 


20000000 20 





00000 







LDa 
COMMON 


?HB 




aOURfSS FORMAT ERROR 




C 00340 


20000005 20 





00005 


n 




LDA 


5 




ATTEMPT TO ASSEMBLE INFO IN 




00341 


00000007 






OCT 


t 




THE COMMON AREA 
















Pkq 










DA 00342 


20000343 20 





P00343 







LUA 


GEORGE 




MULTIPLY IJEFTNEl SYMBOL 




• 00343 


OOOOOUOl 




GfcORGt 


OCT 


1 








D 00344 


00000012 




GEORGE 


OEc 


10 








• L 00345 


20000005 20 





00005 





1<>3 


LUA 


S 




LOCATION FIEi_0 ERROR # 




M 00346 


00000005 00 





00005 







LUAtl 


s 




OPERATION MODIFIER ERROR 




00347 


00000000 00 





00000 







Lin 


s 




OPERATION CODE cRROR 




9 U 003S0 


20000000 20 





OOOOO 







LOa 


SAM 




UNDEFINED SYMBOL 9 




T 00351 


20000352 20 





P00352 







lua 


CHAR 




TRUNCATION FnROR 








003523 




OAK 


EuijiC 


»*3 


















««««««« 


*««««««>«««*«•*«»« 


««»»*<«»»«•«»»••*•«»•»»**««*« » »««««»••«••«»•«««••««««« 
















LITERAL IN A CHARACTER ADDRESS INSTRUCTION • 




00352 


22001670 22 





P00356 







LACH 


=012 


















*#»*»»# 


««««•«*««» 


»«*••* »»*««««*<«««B»««*»»««««*ea««»««««« «•«•••«••«««•«••••»•«« 














*»««*«« 


««««••«»•« 


»•»<««»« 


«•««••*««««»«•«••••»•»««•*»«•«««»«««••«*•««*«,*«„,««, £ 
















*LsNK CHARACTERS 


IN SYMHOLS 






L 00353 


20000353 20 





P00353 





S*M BOL 


LOA 


« 








• U 00354 


01000000 01 





00000 







UJP 


SYM ROL 








U 00355 


01000000 01 





00000 





*#*•»#» 




SYMBOL 


»»•»»«»•»«»« 


• «><«»»»»ll«<«ll«««t<tt«<ll««tt»«ig««i««t 














»*••*•«*••«««•«»• 


»*««»»»**a*«**«»««»4 


• a>****»e«»««««««««*»»««*««*»«a«« <><v<><l «, 9 
















END 










• LITERALS 






















00356 


00000012 








00357 




21222324 


00360 77777777 




_ 00361 


00000011 




















• 00362 
00366 


0000000000000011 
737373737373737: 






00364 
O037O 


2004440000000000 # 
21222324252*2730 
















NUMBER OF LINES WITH DIAGNOSTICS 13 




9 COMPASS-32 


!2il> 




c 


SAMPLES 
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ADDRESS 


25252 










P25?b? 










• AUHS 


00025 










P00315 










8 


00003 










Poooon 

P00006 
PO0012 
P00020 
P00024 
P00030 
P00034 
P00050 
P00061 
P00117 
P00126 
P00134 
P0014* 




POOOOl 
P00007 
P00015 
P00021 
P00025 
P00031 
P00035 
P00055 
P00073 
P001?3 
P00127 
P00137 
P00147 


POOOO* P00005 

P00010 P00011 

P00016 P00017 9 

P00022 P00023 

P00026 P00027 

P00032 P00033 • 

P00042 P00047 

P00056 P00060 

P00113 P00114 9 

P00124 P00125 

P00130 P00131 

P00142 P00145 • 1 

P00150 P00165 




Bl 


00001 










P00002 




P00014 


P00036 




• BH 


00002 










P00003 




P00013 


P00037 # 




83 


00003 










P00040 




P00041 






C 


00023 










P00151 




POO 154 






• CC 


07007 










P00166 










CH 


00006 










P00166 
P00200 
P00214 
P00226 




P0O170 
P00203 
P00217 
P00227 


P00172 P00175 

P00206 P00211 

P0022* P00225 9 

P00230 




CHAR 


P00352 3 










P00351 










9 CHARADR1 


P00334 










P00334 










CHARAUR2 


P00334 3 










P00335 










FC 


00022 










P00170 










• FCA 


05252 3 










P00036 
P00151 
P05352 




P00037 
P00154 
P05252 


P00040 P00041 9 
P00172 P00206 




• FUCA 


05352 3 










P00157 










FL 


00012 










POO0*3 




P00157 






FSCA 


05252 3 










P00157 










• F*A 


25252 










P00200 




P0021* 






GEOkGE 


P00343 




MULTIPLE- 


■DEFINED 


P0034? 










_ HOLMSG 


P00277 










P00277 




P00277 






• INTERVAL 


00002 










POOlfc? 




POO 163 






K 


00014 










P000*2 
P00131 




P001?6 


P001?? P00130 




• LCA 


05254 










pooisi 




P00154 


P0017,r> P00206 9 




LMA 


2!>3?1 










puo?oo 




P00<M* 




! 


A M 


25252 










pooooo 
Poooof, 
poooi? 

P00020 

poon?« 
pooojd 

P000H 

Ruoo** 

POOO/b 
PU010) 
P 1 n s 




poooni 

P00007 

pnoni5 

P00D21 

pnoa?b 

POOOH 
P00035 
P00071 
P00H76 

pooin? 

» n 1 n 6 


POOOO* POOODb 

poonio pooou 9 

POOnif, P00017 ! 
P0002<! P00023 

poon?*, pouo?? • ! 

P0003<> POU039 

P00044 P000«5 

P0007J MU007* • 

P n 7 7 PU010U 

POO] 1 POOl'14 

POO',"' P001M 9 



A-8 



A-9 



R 


05252 3 




SAM 


00000 


UNDEFINED 


SYM 


00000 


UNDEFINED 


SYMB1 


P00312 




SYMBZ 


P00313 




SYMBOL 


00000 


UNDEFINED 


TEMP 


P00317 




TEMPI 


P00317 




TOM 


P00302 




TOMC 


P00305 




TOMC1 


P00305 3 




V 


00077 




WOHOAOHS 


P00334 




X 


07777 





LITERAL 
LITERAL 
LITERAL 
LITERAL 
LITERAL 
LITERAL 
LITERAL 
LITERAL 



123*5 



P00366 
P00360 
P0036Z 
P00361 
P00356 
P00364 
P00370 
P00357 



7373737373737373 

77777777 

0000000000000011 

00000011 

00000012 

2004440000000000 

2122232425262730 

21222324 



P00111 
P0014A 
P00163 
P25252 
P00002 
P00242 
P00350 
P00354 
P00314 
P00314 
P00355 
P00316 
P00320 
P00306 
P00307 
P00310 
P00051 
P00055 
P00336 
P00226 
P00232 
P00115 
P00121 
P00125 
P00135 
P00141 
P00145 
P00325 
P00324 
P00322 
P00321 
P00352 
P00323 
P00327 
P00326 



P00112 
PO0H7 
P00164 
P25321 
P00003 
P05252 



P00317 



P00052 
P00056 

P00227 
P00233 
P00116 
P00122 
P00132 
P0Q136 
PO0142 



11/71/66. PASE 
P00113 P00U4 

P00150 P00162 

P00165 P05252 



P00013 
P05254 



P00317 



P00230 
P00236 
P00117 
P00123 
P00133 
P00137 
P00143 



P00014 



P00231 
P00237 
P00120 
P00124 
P00134 
P00140 
P00144 



SYMBOLS NOT REFERENCED 
BCOBOXS EXT 



FDP80XS EXT 



COMPASS-32 (2.1) 



EXAMPLE 20 (AVERAGE) 



11/21/66 PASE 1 



ENTRY-POINT SYMBOLS 

START 00000 



LENGTH OF SUBPROGRAM 00016 
LENGTH Of COMMON 00000 

LENGTH OF DATA 00000 



COMPASS-32 


(2.1) 


Example 20 


(AVERAGE) 












THIS 


PROGRAM KILL 
ENT*Y 


COMPU 
START 


00000 


01077777 01 


77777 





START 


UJP 


•• 


00001 


20000011 20 


P00011 







LDa 


NUMB 1 
NUMB2 


00002 


30000012 30 


P00012 







ADA 


00003 


30000013 30 


P00013 







AOa 


NUM81 


00004 


130777*7 13 


77747 







SHAW 


-24 


00005 


510000U 51 


P00014 







OVA 


THREE 


00006 


40000015 40 


P00015 







STa 


AVG 


00007 


77770000 77 


1 70000 


3 




ucs 




00010 


moobooo oi 


POOOOO 







UJP 


START 


00011 


00000100 




NUMR1 


OCT 


100 


00012 


00000011 




NUMR2 


OEc 


9 


00013 


00000020 




NUMB3 


OCT 


20 


00014 


00000003 




THREE 


OEc 


3 


00015 








AVG 


BSS 
END 


1 
START 



A-IO 



EXIT TO MONITOR PROGRAM 

LOAD FIRST NUMBFR INTO A 

ADD SECOND NlJMdFR 

ADD THIRD NIJH9EO 

CONVERT TO A 48 BIT VALUE 

DIVIDE BY THREE 

STORE RESULT 

STOP 

80 TO EXIT ON RESTART 

CONSTANT (100 OCTAL) 

CONSTANT (9 DECIMAL, 11 OCTAL) 

CONSTANT (20 OCTAL) 

CONSTANT (3) 

RESERVED LOCATION FOR RESULT 



NUMBER OF LINES rflTH DIAGNOSTICS 



ASS-32 


(2.1) 


AVG 


P00015 


NUMol 


POOOll 


NUM82 


P00012 


NUMHJ 


P00013 


START 


POOQOO 


THREE 


P000]* 



EXAMPLE 20 (AVERAGE) 

P00006 
"00001 
P00002 
P00003 
P00Q10 
P00005 



ll/?l/66 PAGE 



COMPASS-32 (2.1) 



A-l 



EXAMPLE 19A (CR2PR) 



11/21/66 PAGE 1 



ENTRY-POINT SYMBOLS 

START 00000 



LENGTH OF SUBPROGRAM 00045 
LENGTH OF COMMON 00000 

LENGTH OF OAT* 00000 



COMPASS-32 


(2.1) 






EXAMPLE 19 


A (CR2PR) 


















ENTRY 


START 














THIS 


PROGRAM KILL 


REAO ONE HOL 


00000 


01077777 


01 





77777 





START 


UJP 


*« 


00001 


77012000 


77 





12000 





REPFAT 


CON 


20008.1 


00002 


01000001 


01 


Q 


P00O01 







UJP 


»-l 


00003 


74000045 


74 





P00045 







INPW 


l.BUF.BUF+20 


00004 


10000021 


10 





P00021 











00005 


01000003 


01 





P00003 







UJP 


*-2 


00006 


77310002 


77 





10002 


3 




INS 


2.1 


00007 


01000006 


01 





P00006 







UJP 


«-l 


00010 


77013000 


77 





13000 







CON 


3000H.1 


00011 


01000010 


01 





P00010 







UJP 


•-1 


00012 


76000045 


76 





P00045 







OUT"* 


1.8UF,BUF*20 


00013 


10000021 


10 





P00021 











00014 


01000012 


01 





P00012 







UJP 


•-2 


00015 


77310004 


77 





10004 


3 




INS 


4.1 


00016 


01000015 


01 





P00015 







UJP 


»-l 


00017 


77770000 


77 


1 


70000 


3 




UCS 




00020 


01000001 


01 





P00001 







UJP 


REPEAT 


00021 












BUF 


ess 

END 


20 
START 



11/21/66 PAGE 



ESTABLISH CONNECTION TO CR 
REJECT INSTRUCTION 
INITIATE INPUT OF ONE CARO 

REJFCT INSTRUCTION 

SENSE TO SEE IF CHANNEL 1 IS BUSY 

BUSY - THEN KEEO CHECKING 

NOT BUSY - THEN CONNECT TO PR 

REJFCT INSTRUCTION 

INITIATE OUTPUT OPERATION 

REJFCT IMSTRUCTTON 

SENSE TO SEE IF CHANNEL 1 IS BUSY 

BUSY - THEN KEEP CHECKING 

NOT BUSY - THEN STOP 

REPFAT ON RESTAPT 



NUMrER OF LINES WITH DIAGNOSTICS 



A-12 



ll/?l/b6 PAGE 1 
P00012 P00012 



1 l/5»l/66 PA3E I 



COMPASS-32 



8UF 
REPEAT 



P00021 
POOOOl 



EXAMPLE 19A (CR2PH) 



P00003 
P00020 



SYMBOLS NOT REFERENCED 

•START P00O0O 



COMPASS-32 (2.1) 



EXAMPLE 21 (COOE) 



ENTRY-POINT SYMBOLS 

IN. OOT OOOOO 



LENGTH OF SUBPROGRAM 0001* 
LENGTH OF COMMON 00000 

LENGTH OF DATA 00000 



COMPASS-32 



A-13 



EXAMPLE 21 (CODE) ll/?l/66 PASE 

ENTRY IN.OUT 

THIS PROGRAM WILL HANG IN A LOOP UNTIL THE SELECTIVE JUMP KEYS ARE 

SET TO A CODE OF 35 OCTAL. PROGRAM REPEATS ON RESTART. 



00000 


01077777 


01 


77777 


IN.OUT 


UJP 


•• 


00001 


00100003 


00 


P00003 1 


LOOP 


SJl 


•♦2 


00002 


01000001 


01 


P00001 




UJP 


LOOP 


00003 


00200001 


00 


P00O01 2 




SJz 


LOOP 


00004 


00300006 


00 


P000O6 3 




SJ3 


•♦2 


00005 


01000001 


01 


PO0001 




UJP 


LOOP 


00006 


00400010 


00 


1 P00010 




SJ4 


**Z 


00007 


01000001 


01 


P00001 




UJP 


LOOP 


00010 


00500012 


00 


1 P00012 1 




SJ5 


•*2 


00011 


01000001 


01 


P00001 




UJP 


LOOP 


00012 


00600001 


00 


1 P00001 2 




SJ6 


LOOP 


00013 


00000001 


00 


P00001 




HLT 
END 


IN.OUT*l 
IN.OUT 



TEST BIT 



TEST BIT 1 
TEST BIT 2 



TEST BIT 3 
TEST BIT 4 



TEST BIT 5 
STOP 



NUMBER OF LINES WITH DIAGNOSTICS 



COMPASS-32 



EXAMPLE 21 (CODE) 



11/21/66 PAGE 



IN.OUT 
LOOP 



P00000 
P00001 



P00013 
P00002 
P00011 



P00003 
P00012 



COMPASS-32 (2.1) 



A-14 



EXAMPLE. 22 (MEU.TEST) 



11/21/66 PAGE 1 



ENTRY-POINT SYMBOLS 

START OOO00 



LENGTH OF SUBPROGRAM 000U 
LENGTH OF COMMON 00000 

LENGTH OF DATA 00000 



COMPASS-32 



(2.1) 



EXAMPLE 22 (MEU.TEST) ll/?l/66 PAGE 

ENTRY START 
THIS PHOGRaM KILL COUNT THE NUMBER 0? E«EN LOCATIONS IN MEMORY (8K) 
KITH 35 IN CHARACTER POSITION 2, 



ClEaR COUNTER (R3) 
SET Bl TO 1T7T6B 
SET SEARCH PATTERN IN A 
StT SEARCH waSK IN y 
••• SEARCH *•» 
•» NOT FOUND ** THEN STOP 
•• FOUND *« THEN INCREASE COUNT 
AND CONTINUE SEARCH 
DISPLAY RESULTS IN B3 
£*IT IF JUMP KEY 1 IS SET 
OTHFRrflSE REPEAT 



NUMBER OF LINES KITH DIAGNOSTICS 



00000 


01077777 


01 





77777 





START 


UJp 


»» 


00001 


1*300000 


1* 





00000 


3 




ENI 


0.3 


00002 


1*117776 


1* 





17776 


1 




ENl 


1T776B.1 


00003 


1*603500 


1* 


1 


03500 


2 




EN» 


3500B 


00004 


1*?0?700 


1* 


1 


07700 


3 




C.NQ 


'CTOOS 


00005 


06200000 


06 





00000 


2 


REENTER 


MEQ 


" • "i 


00006 


01000011 


01 





P00011 







UJP 


STOP 


00007 


15300001 


15 





00001 


3 




INI 


1.3 


00010 


01000005 


01 





P00005 







UJP 


REENTER 


00011 


77770000 


77 


1 


70000 


3 


STOP 


UCS 




00012 


noiooooo 


00 





POOOOO 


1 




SJ1 


START 


00013 


01000001 


01 





P00001 







UJP 

END 


START*1 

START 



A-15 



COMPASS-32 



REENTER 

START 

STOP 



P00005 
POOOOO 
POOOll 



EXAMPLE 22 (MEU.TEST) 

P0OO10 
P00012 
POOO06 



ll/?l/66 PASE 



P00013 



COMPASS-32 (2.1) 



EXAMPLE 23 (TY.oUT) 



11/31/66 PASE 1 



ENTRY-POINT SYMBOLS 

TY.OUT OOOOO 



LENGTH OF SUBPROGRAM 00010 
LENGTH OF COMMON OOOOO 

LENGTH OF DATA OOOOO 



CUMPASS-32 



A-16 



ll/?l/66 PAGE 



EXAMPLE 23 (TY.OUT) 

ENTRY TY.OUT 
THIS IS A CLOSEO SUBROUTINE FOR TYPING MESSAGE ON THE CONSOLE TY. 



CALLING SEQUENCE 



ECHA 

F.NU 

RTJ TY.OUT 

NEXT INSTRUCTION 



fca (first char adrs OF MSSE) 

NUM« CHARS (LENGTH OF MESSAGE) 



NOTE TY.OUT MUST BE DECLARED FXTERNAL (EXT 



00000 


01077777 


01 





77777 


TY.OUT 


UJP 


• • 


00001 


77600*00 


77 


1 


00400 


£ 


PAi.lS 


400B 


00002 


01000001 


01 





P00001 





UJD 


*-l 


00003 


53420023 


53 


1 


20023 





TAM 


23B 


00004 


53040000 


53 





40000 





AU'A 




00005 


53420033 


53 


1 


20033 





TAM 


33B 


00006 


77760000 


77 


I 


60000 


3 


CTo 




00007 


nioooooo 


01 





P00OOO 





UJP 
END 


TY.O 



IS TY CURRENTLY BUSY 

YES - THEN KEEP CHECKING 

NO . THEN PLACE FCA IN REG 238 

FORM LCA»1 

place lca*i in beg 33b 
initiate output 
return to usfr 



NUMBER OF LINES WITH DIAGNOSTICS 



CUMPASS-32 (2.1) 

TY.OUT P000O0 



EXAMPLE 23 (TY.OUT) 

P00007 



ll/Pl/66 PAGE 



A-17 



COMPASS-32 (2.1) 



EXAMPLE 24 (QEMo) 



1 1/51/66 PASE 1 



ENTRY-POINT SYMBOLS 

START 00000 



LENGTH OF SUBPROGRAM 00614 
LENGTH UF COMMON 00000 

LENGTH OF DATA 00000 



COMPASS-32 



00000 01077777 01 



00001 
00002 
00003 
00004 
00005 



EXAMPLE 24 (DEMO) 
ENTRY 
77777 START UJP 



11/71/66 PAGE 



11000034 11 
53420023 53 1 
11003060 11 
53420033 53 1 
77760000 77 1 



P00007 
20023 

P00614 
20033 
60000 



00006 00000000 00 P00000 



00007 


31602144 


00010 


60216023 


00011 


46456351 


00012 


46436024 


00013 


21632160 


00014 


03020000 


00015 


60234644 


00016 


47646325 


00017 


51336031 


00020 


60214460 


00021 


77575757 


00022 


21602231 


00023 


45215170 


00024 


73602631 


00025 


67252460 


00026 


66465124 


00027 


60432545 


00030 


27633073 


00031 


60626346 


00032 


51252460 


00033 


47514627 


00034 


51214473 


00035 


77575757 


00036 


24312731 


00037 


63214360 


00040 


23464447 


00041 


64632551 


00042 


77775757 


00043 


63302562 


00044 


25602151 


00045 


25604470 


00046 


60624725 


0QO%7 


°33 1 2631 


00050 


23216331 


00051 


46456260 


00052 


77775757 


00053 


01330205 


00054 


60443123 


00055 


51466062 



THE FOLLOWING INSTRUCTIONS WILL INITIATE An OUTPUT TO THE CONSOLE TY 

FIRST CHAR AORS TO A 
THEN TO REG FILF LOC 23B 
LAST CHAR ADRS TO A 
THEu TO REG FlLF LOC 33B 
INITIATE TYPF OUT 

HLT START EXIT BACK TO SCOPE ON RESTART 

FOLLOWING IS THE MESSAGE 
MSG 8C0»C 40tl AM A CONTROL DATA 3?00 COMPUTER. I AM 



ECHA 


MSG 


TAm 


23B 


ECmA 


MSGEND 


TAm 


33B 


CTo 





OCT 
BCDtC 



77575757 

44iA BINARY. FIXEO WORD LENGTH. STORED PROGRAM, 



OCT 77575757 

BCD»C 16. DIGITAL COMPUTER 



OCT 77775757 

BCD.C 28. THESE ARE MY SPECIFICATIONS 



OCT 77775757 

BCO.C 36,1.25 MICRO SECOND MEMORY CYCLE TI*E 



COMPASS-32 (2,1) 




EXAMPLE 24 (DEMO) 


!l/?l/66 PASE 3 • 


00056 


25234645 






00057 


24604425 






00060 


44465170 






00061 


60237023 






00062 


43256063 






00063 


31442560 






00064 


77575757 


OCT 


77575757 


00065 


10427360 


BC0»C 


40.8K, 16K. OP 32K ifOHDS OF CORF STARAliE ' 


00066 


01064273 






00067 


S0465160 






00070 


03024260 






00071 


60664651 






00072 


24626046 






00073 


26602346 






00074 


51256062 






00075 


63465121 






00076 


27256060 






00077 


77575757 


OCT 


77575757 • 


00100 


02046022 


8Cn«C 


20.24 BIT WORD LENGTH 


00101 


31636066 






00102 


46512460 






00103 


43254527 






00104 


63306060 






00105 


77575757 


OCT 


77575757 • 


00106 


03603145 


8CD.C 


20.3 INDEX RtGISTERS 


00107 


24256760 






00110 


51252731 






00111 


62632551 






00112 


62606060 






00113 


77575757 


OCT 


77575757 • 


00114 


44644363 


8CD.C 


32. MULTI-LEVEL INOlRFCT ADDRESSING 


00115 


31404325 






00116 


65254360 






00117 


31452431 






00120 


51252363 






00121 


60212424 






00122 


51256262 






00123 


31452760 






00124 


77575757 


OCT 


7757S757 • 


00125 


23302151 


BCDiC 


32.CHAPACTER HANOLlNr; INSTRUCTIONS 


00126 


21236325 






00127 


51603021 






00130 


45244331 






00131 


45276031 






00132 


45626351 






00133 


64236331 






00134 


46456260 






00135 


77575757 


OCT 


77575757 • 


00136 


22642626 


aco.c 


48, BUFFERED CHARACTEs SEiRCH AND MOVE OPERATIONS 


00137 


25512524 






00140 


60233021 






00141 


51212363 






00142 


?5516062 






00143 


25215123 






COMPASS-32 (2.1) 




EXAMPL.i 24 (DEMO) 


11/71/66 PASE 4 9 


03144 


300021*5 






00145 


74604446 






00146 


65256046 






00147 


47255121 






00150 


63314645 






00151 


62606060 






00152 


77575757 


OCT 


77375757 


00153 


P346456? 


ncn.c 


20, CONSOLE T»Pf«/RlTE« _ 


00154 


46432560 






00155 


63704725 






00156 


66513163 






00157 


25516060 






00160 


77575757 


OCT 


77575757 


00161 


51252143 


BCO.C 


16, REAL TI«E CLOCK _ 


00162 


60633144 






00163 


25602343 






00164 


46234^60 






00165 


77775757 


OCT 


77775757 • 


00166 


62632145 


seme 


1?, STANDARD ARITHMETIC CAPABILITIES 


00167 


24215124 






00170 


60215131 






00171 


63304425 






00172 


63312360 






00173 


23214721 






00174 


22314331 






00175 


63312562 






00176 


77776060 


OCT 


77776060 • 


00177 


O2046022 


BCo.C 


?8»24 BIT AOO. SUB. MULT ♦ DIV 


0020O 


31636060 






00201 


21242473 






00202 


60626422 






00203 


73604464 






00204 


43636020 






00205 


60243165 






00206 


77576060 


OCT 


77576060 m 


00207 


04106022 


«Co»C 


20.48 BIT Al'!1 ♦ SJ8 • 


00210 


31636060 






00211 


21242460 






00212 


20606264 






00213 


22606060 






00214 


77775 757 


OCT 


77775757 m 


00215 


46476331 


acn.c 


32. OPTIONAL ARITHMETIC CAPABILITIES • 


00216 


46452143 






00217 


60215131 






00220 


63304425 






00221 


63312360 






00222 


23214721 






00223 


22314331 






00224 


63312562 






00225 


77776060 


OCT 


77776060 ^ 


00226 


P6476124 


BCO.C 


S7.FP/DP PACKASE FLQiTING POI'lT iDD» SUB, mUlT * • 



A- 18 



00227 
00230 
00231 



47604721 
23422127 

2560606H 



# COMPASS-32 (2.1 > 




EXAMPLE 24 


(DEMO) 


11/21/66 PAGE 5 • 


00232 


60602643 








00233 


46216331 








• 00234 


45276047 








00235 


46314563 








00236 


60212424 








• 00237 


73606264 








00240 


22736044 








00241 


64436360 








00242 


20606060 








00243 
00244 


77576060 
60606060 




OCT 
BCDiC 


77576060 DIVIDE AND FIXED POINT 48 8IT ^ 


# 00245 


60606060 








00246 


60606060 








00247 


60606060 








# 00250 


60602431 








00251 


65312425 








00252 


60214524 








# 00253 


60263167 








00254 


25246047 








00255 


46314563 








# 00256 


60041060 








00257 


22316360 








00260 
• 00261 


77576060 
60606060 




OCT 
8C0«C 


77576060 A 
28, MULT ♦ OIV w 


00262 


60606060 








00263 


60606060 








• 00264 


60606060 








00265 


60604464 








00266 


43636020 








# 00267 


60243165 








00270 
00271 


77576060 
22232460 




OCT 
SCDtC 


52!bC0 6 PACKAGE BINARY COOEO OECIMAL ADO ♦ SUB ^ 


• 00272 


47212342 








00273 


21272560 








00274 


60606060 








• 00275 


60602231 








00276 


45215170 








00277 


60234624 








• 00300 


25246024 








00301 


25233144 








00302 


21436060 








9 00303 


21242460 








00304 


20606264 








00305 


22606060 








# 00306 
00307 


77775757 
31454764 




OCT 
BCOtC 


77775757 

28, INPUT/OUTPUT CAPABILITIES 


00310 


63614664 








# 00311 


63476463 








00312 


60232147 








09313 


21223143 








00314 


31633125 








00315 


62606060 








00316 
00317 


77776060 
02401060 




OCT 
BCOiC 


77776060 A 
20,2-8 DATA CHANNELS w 


COMPASS-32 (2.1) 




EXAMPLE 24 (DEMO) 


11/21/66 PAGE 6 • 


00320 


24216321 








00321 


60233021 








# 00322 


45452543 








00323 


62606060 








00324 
9 00325 


77576060 
01401060 




OCT 
BCOiC 


77576060 r A 
44,1-8 EQUIPMENT CONTROLLERS PER DATA CHANNEL ^ 


00326 


25506431 








00327 


47442545 








• 00330 


63602346 








00331 


45635146 








00332 


43432551 








• 00333 


62604725 








00334 


51602421 








00335 


63216023 








• 00336 


30214545 








00337 


25436060 








00340 
• 00341 


77776060 
60606060 




OCT 
BCn»C 


77776060 „„„„„ • 
40, AVAILABLE EQUIPMENT SPEEDS w 


00342 


21652131 








00343 


43212243 








# 00344 


25602550 








00345 


64314744 








00346 


25456360 








# 00347 


60606060 








00350 


60606060 








00351 


60606247 








• 00352 


25252462 








00353 
00354 


77576060 
60606060 




OCT 

8C0»C 


77576060 

48, MAGNETIC TAPES T.5KC - 120KC ~ 


• 00355 


60604421 








00356 


27452563 








_ 00357 


31236063 








• 00360 


21472562 








00361 


60606060 








00362 


60606060 








• 00363 


60606060 








00364 


60073305 








_ 00365 


42236040 








# 00366 


60010200 








00367 


42236060 








00370 
• 00371 


77576060 
60606060 




OCT 

ecofC 


77576060 m 
48, CARD READER 12°° CARDS/MIN • 


00372 


60602321 








00373 


51246051 








• 00374 


25212425 








00375 


51606060 








00376 


60606060 


















w uOjrr 








00400 


60606060 








00401 


60010200 








• 00402 


00602321 








00403 


51246261 








00404 


44314560 








• 00405 


77576060 




OCT 


77576060 



A- 19 



# COMPASS-32 (£ 
00406 
00*07 


.1) 

60606060 
60602321 


EXAMPLE 24 


(DEMO) 
BCD»C 


11/71/66 PAGE 7 • 

48, CARD PUNCHES 150 - ?50 CARDS/MIN 


9 00410 


51246047 








00411 


64452330 








_ 00412 


25626060 








• 00413 


60606060 








00414 


60606001 








^ 00415 


05006040 








• 00416 


60020500 








00417 


60232151 








00420 


24626144 








00421 


31456060 








00422 


77576060 




OCT 


77576060 


_ 00423 
• 00424 


60606060 
60604721 




SCOtC 


48, PAPER TAPE STATIONS 350 - 1000 CPS READ 


00425 


47255160 








- 00426 


63214725 








• 00427 


60626321 








00430 


63314645 








_ 00431 


62606003 








• 00432 


05006040 








00433 


60010000 








^ 00434 


00602347 








• 00435 


44606051 








00436 


25212060 








00437 


77576060 




OCT 


77576060 


• 00440 
00441 


60606060 
60606060 




ecoic 


* 8 » 110 CPS PUNCH • 


_ 00442 


60606060 








• 00443 


60606060 








00444 


60606060 








A 00445 


60606060 








• 00446 


60606060 








00447 


60606060 








00450 


60600101 








• 00451 


00602347 








00452 


44606047 








_ 00453 


64452330 








• 00454 


77576060 




OCT 


77576060 % 


00455 
_ 00456 


60606060 
60604331 




8CD»C 


48, LINE PRINTERS 150 - 1000 LINES/MIN 


• 00457 


45256047 








00460 


51314563 








_ 00461 


25516260 








• 00462 


60606060 








00463 


60606001 








00464 


05006040 








• 00465 


60010000 








00466 


00604331 








00467 


45256261 








• 00470 


44314560 








00471 


77576060 




OCT 


77576060 


_ 00472 
• 00473 


60606060 
60602431 




BCDfC 


52, DISC PACKS 97 mILLI SEC AV6 ACCESS 


• COMPASS-32 (2. 


1) 


EXAMPLE 24 


(DEMO) 


ll/?l/66 PAGE A % 


00474 


62236047 








00475 


21234262 








• 00476 


60606060 








00477 


60606060 








— 00500 


60606011 








• 00501 


07604431 








00502 


43433160 








A 00503 


62252360 








• 00504 


21652760 








00505 


21232325 








~ 00506 


62626060 








• 00507 


77576060 




OCT 


77576060 £ 


00510 
A 00511 


60606060 
60606060 




BCO'C 


* a » 71K CHAR/SEC AVG XFER 


• 00512 


60606060 








00513 


60606060 








_ 00514 


60606060 








• 00515 


60606060 








00516 


60606007 








_ 00517 


01426023 








9 00520 


30215161 








00521 


62252360 








^ 00522 


21652760 








• 00523 


67262551 








00524 


77576060 




OCT 


77576060 


00525 
• 00526 


60606060 
60602451 




HCOtC 


52, DRUM STORAGF 17 mILlI SEC AVS ACCESS 


00527 


64446062 








^ 00530 


63465121 








• 00531 


27256060 








00532 


60606060 








_ 00533 


60606001 








• 00534 


0760443] 








00535 


43433160 








_ 00536 


62252360 








• 00537 


21652760 








00540 


21232325 








_ 00541 


62626060 








• 00542 


77576060 




OCT 


77576060 £ 


00543 
^ 00544 


60606060 
60606060 




BCo»C 


*8» 250K - 2M CHAP/SEC DATA XFER 


• 00545 


60606060 








00546 


60606060 








m 00547 


60606060 








• 00550 


02050042 








00551 


60406002 








00552 


44602330 








• 00553 


21516162 








00554 


25236024 








^ 00555 


21632160 








• 00556 


67262551 








00557 


77576060 




OCT 


77576060 


00560 


60606060 




HCruC 


16, PLOTTERS 


• 00561 


60b0474l 









A- 20 



A-21 



CUMPASS-32 (2. 


1) 


00562 


46636325 


00563 


51626060 


00564 


77576060 


00565 


60606060 


00566 


60604721 


00567 


27256051 


00570 


25212425 


00571 


51606060 


00572 


77576060 


00573 


60606060 


0057* 


60602351 


00575 


63602431 


00576 


62474321 


00577 


70606445 


00600 


31636260 


00601 


77576060 


00602 


60606060 


00603 


60602145 


00604 


24604421 


00605 


45706046 


00606 


63302551 


00607 


60624725 


00610 


23312143 


00611 


31712524 


00612 


60242565 


00613 


31232562 




00614 



EXAMPLE 24 (U£Mo) 



OCT 

ecoic 



OCT 
BCD»C 



OCT 
BCDtC 



MSGENO 



EOu»C 
END 



ll/?l/66 PASE 



77576060 

20. PAGE HEADER 



77576060 

?4, CRT DISPLAY UNITS 



77576060 

40. AND MANY OThEH SPECIALIZED DEVICES 



START 



NUMBER OF LINES WITH DIAGNOSTICS 



COMPASS-32 



(2.1) 



EXAMPLE 24 (DEMQ) 



11/21/66 PAGE 



MSG 

MSGENO 

START 



P00O07 
P00614 
P00000 



P00001 
P00003 
P00006 



A-22 



COMPASS-32 (2.1) 



EXAMPLE 25 INTOHIVEB) 



11/21/66 PAGE 1 



ENTRY-POINT SYMBOLS 

MTDRIVER 00000 



LENGTH OF SUBPROGRAM 00101 
LENGTH OF COMMON 00000 

LENGTH OF DATA 00000 



COMPASS-32 



»LE 25 (MtORIVER) 11/21/66 PAGE 2 

ENTRY MTORIVER 
THIS SUBPROGRAM IS AN I/O DRIVER DESIGNED TO HANDLE ALL HAG TAPE 
OPERATIONS, USE OF THIS DRIVER WILL GREATLY REDUCE THE AMOUNT OF EFFORT 
REQUIRED ON THE PROGRAMMERS PART WHEN WORKING WITH MAG TAPE. HE NEED 
NOT EVEN BE CONCERNED WITH THE EQUIPMENT CONFIGURATION OF THE PARTICULAR 
MACHINE IN USE, SINCE THIS IS HANDLED BY MTDRIVER. 



> CALLING SEflUENCE 

1. SET PARAMETERS INTO A * Q 

(A) A a TAPE UNIT NUMBER (0-7) 

(B) Q 23-18 * FUNCTION CODE 

(C) Q 14-00 = SUFFER FWA (NEEDED FOR I/O REQUEST ONLY) 

2. RTJ TO MTDRIVER (MTDRIVER MyST BE DECLARED EXTERNAL) 



-- OPERATIONS AVAILABLF — — — - 
OPERATION 

1. READ 30 WUS IN BCn (1?0 CHARS) 

2. READ 40 WOS IN BINARY 

3. WRITE 30 WDS IN BCD (120 CHARS) 

4. WRITE 40 WDS IN BINARY 

5. REWIND 
(S. UNLOAO 

7. BACKSPACE 

H. SF.ARCH FILE FORWARD 

<J. SEARCH FIlE BACKWARD 
1(1. WRITE FILE MARK 
11. SKIP BAD SPOT 



FUNCTION CODE (OCTAL) 

01 
02 
03 
04 
10 
11 
12 
13 
14 
15 
16 



ON RETURN 



1. B REGS ARE UNCHANGED. 

2. IF REQUEST WAS I/n (Fr 1-4). THE OPERATION wlLL BE 
COMPLETE. 

3. A 11-00 " STATUS FROM THE TAPE AT EMU OF OPERATION 

IF REQUES1 WAS I/O (FC 1-4). 

4. A IS MEANINGLESS IF NOT l/~ REQUEST. 

5. Q IS MEANINGLESS. 

- ERROR PROCEDURES 



1. IF TAPE UNIT IS FOUND je'.QT 
WILL BE TYPED (REaDY uT X> , 
WHEN UNIT IS READy, 

2. ALL REJECTS WILL LOOP. 



:EAOY# A DIAGNOSTIC 

PROGRAM WILL CONTINUE 



# CUMPASS-32 


(2.J) EXAMPLE 25 


(MTURIVER) 


\\/?\/bb page" 3 • 


uoooo 


01077777 01 77777 


^TURIVEK 


UJP 


*« 


LINKAGE BACK TO USER 






»•••••« 


IN11IALIZING PROCEDURE •*•»»• 




OOOOl 


42000157 42 P00033 3 




SACH 


CONNECTS 


ESTABLISH CONNECT CODE 


• 00002 


42000371 42 P00076 1 




SACK 


HDYMSG*9 


SET TAPE NO. IN READY MESSAGE • 


00003 


14600000 14 1 00000 2 




ENA 





PLACE FUNCTION CODE 


# 0U004 


13000006 13 00006 




SHAU 


6 


IN A 5-0. * 


00005 


42000400 42 P00100 




SACH 


FC 


SAVE FUNCTION CODE 


00006 


05600017 05 1 00017 2 




ASS 


17B 


IS THIS AN _ 


O 00007 


05600010 05 1 00010 2 




ASG 


10B 


I/O REQUEST • 


00010 


01000013 01 P00013 




UJP 


INPOUT 


YES - THEN JUMP 


00011 


4200U247 42 P00051 3 




SACH 


SELECT*3 


NO - THEN SET SELECT CODE AND # 


00012 


01000033 01 P00033 




UJP 


CONNECT 


GO TO CONNECT PROCEDURE 


% 00013 


05600005 05 1 00005 2 


1NP0UT 


Abli 


5 


TEST TO SEE IF FUNCTION CODE IS • 


00014 


05600001 05 1 00001 2 




ASG 


1 


LEGAL. 


00015 


00000015 00 P00015 




HLT 


« 


BLIND HALT ON ILLEGAL CODE ^ 


00016 


12000005 12 00005 




SHA 


5 


POSITION FC AND FWA IN A 


00017 


13000022 13 - 00022 




SHAU 


18 


fl 14-00 * FWA OF USER#S BUFFER ^ 
A 23 * 1 IF BCD REQUEST tO IF BINARY • 


00020 


14700002 14 1 00002 3 




ENU 


2 


BCD SELECT CODE TO Q ♦ _ 


# 00021 


03300023 03 P00023 3 




A/J.LT 


**2 


IS REQUEST BCD • 


00022 


14700001 14 1 00001 3 




ENU 


I 


NO - THEN BINARY CODE TO Q 


00023 


43000247 43 P00051 3 




SUCH 


SELECT*3 


PLACE SELECTED CODE IN SEL INSTRUCTION — 


00024 


44000066 44 P00066 




S«A 


INPUT* 1 


SET FWA IN INPUT/OUTPUT 


00025 


44000062 44 P00062 




SWA 


OUTPUT* 1 


INSTRUCTIONS ^ 


# 00026 


15600036 IS 1 00036 2 




INA 


30 


FORM BCD LWA*1 • 


00027 


03300031 03 P00031 3 




AZJ»LT 


»*2 


IS REQUESTBCD 


00030 


15600012 15 1 00.012 2 




INA 


10 


NO - THEN FORM BINARY L*A*1 ^ 


• 00031 


44000065 44 P00065 




SNA 


INPUT 


SET LWA*1 IN INPUT/OUTPUT • 


00032 


44000061 44 POO061 




SWA 


OUTPUT 


INSTRUCTIONS 


• COMPASS-32 


(2.1) EXAMPLE 25 (MfDRlVER) 


ll/?l/66 PAGE 4 # 






«•»••»« CONNECT 


PROCEDURE *««»«»•» 




0U033 


77001000 77 01000 


CONNECT 


CON 


CONCODE.CH 


CONNECT TO SPECIFIEO MAG TAPE 


00034 


01000033 01 P00033 




UJP 


•-1 








•••«•*« TESl FOR READY •»•*»«»» 




# 00035 


77200001 77 00001 2 




EXa 


OOOltCH 


IS THE CONNECTED UNIT READY • 


00036 


01000051 01 P00051 




UJP 


SELECT 


YES - THEN GO TO SELECT PROCEDURE 


# 00037 


77600400 77 1 00400 2 




PAUS 


4008 


NO - THEN TYPE DIAGNOSTIC # 


00040 


01000037 01 P00037 




UJP 


*-l 


WAIT FOR TY NOT BUSY 


# 00041 


11000360 11 P00074 




ECHA 


RDYMSS 


• 


00042 


53420023 53 1 20023 




TAM 


23b 


- 


00043 


15600013 15 1 00013 2 




INA 


11 


- INITIATE TY OUTPUT 


• 00044 


53420033 53 1 20033 




TAM 


33B 


^ 


00045 


77760000 77 1 60000 3 




CTU 






# 00046 


77200001 77 00001 2 




EXS 


QOOliCH 


• 


00047 


01000051 01 P00051 




UJP 


**2 


- LOOP UNTIL HEADY 


00050 


01000046 01 P00046 




UJP 


*-2 


a 






•»•••«« SELECT 


PROCEDURE •*»»»»•»• 




# 00051 


77100000 77 00000 1 


SELECT 


SEL 


0000. CH 


INITIATE NON-I/O OPERATION OR # 


00052 


01000051 01 P00051 




UJP 


»-l 


SELECT MODE FOR I/O OPERATION 


• 00053 


22000400 22 P00100 




LACH 


FC 


FUNCTION CODE TO A # 


00054 
_ 00055 


05600006 05 1 00006 2 
01000055 01 P00055 




A St> 

UJP 


6 

* 


IS THIS AN I/O REQUEST 

NO - THEN GO TO READ/WRITE PROCEDURE 


• 00056 


01000072 01 P00072 




UJP 


EXIT 


YES - THEN GO TO EXIT • 






«••«»•« HEAU/WRITE PROCEDURE »»*••»*« 




00057 


05600003 05 1 00003 2 




ASu 


3 


IS THIS A READ REQUEST 


00060 


01000065 01 P00065 




UJP 


INPUT 


YES - GO TO INPUT INSTRUCTION 


00061 


76077777 76 77777 


OUTPUT 


OU1W 


CH,»«,»» 


NO - THEN INITIATE OUTPUT 


_ 00062 


00077777 00 77777 










• 00063 


01000061 01 P00061 




UJP 


•-2 


LOOP ON REJECT # 


00064 


01000070 01 P00070 




UJP 


WAIT 


GO TO WAIT BEFORE EXIT 


• 00065 


74077777 74 77777 


INPUT 


INPn 


CH,»*,»» 


INITIATE INPUT # 


00066 


00077777 00 77777 










00067 


0100U065 01 P00065 




UJP 


•-2 


LOOP ON REJECT 



A-23 



COMPaSS-32 



00070 
00071 



00072 
00073 



00074 
00075 
00076 
00077 
00100 



A- 24 



(2.1) 



EXAMPLE 



25 (MTDRIVER) 
»•• NAIT FOR ENO OF OPERATION 



ii/?i/66 page 



77200002 77 00002 2 
01000070 01 P00070 



77200000 77 00000 2 
01000000 01 P00000 



51252124 
70604463 
6067 
77000000 



00000 
01000 



WAIT 



EXS 
UJP 



0002. CH 
•-1 



EXIT PROCEDURE 



COP* 
UJP 



CH 
MTDRIVER 



MISCELLANEOUS •••••••• 

BCU.C 10. READY MT X 



VFO 
BSS.C 



06/77 
1 



SYMBOL EQUATIONS 



IS UNIT STILL BUSY 
YES - THEN LOOP 



RETURN TO USER 



CH EUU 
CONCOOE EUU 1000B 
END 

NUMBER OF LINES tflTH DIAGNOSTICS 



THIS DRIVER MAY BE ALTERED TO FIT ANY 
EQUIPMENT CONFIGURATION BY ONLY THESE 



COMPASS-32 (2 


1) 


CH 


00000 


CONCOOE 


01000 


CONNECT 


P00033 


EXIT 


P00072 


FC 


P00100 


INPOUT 


P00013 


INPUT 


P00065 


MTDRIVER 


P00000 


OUTPUT 


P00061 


RDYMSG 


P00074 


SELECT 


P00051 


NAIT 


P00070 



EXAMPLE 25 (MTDRIVER) 



ll/?l/66 PAGE 1 



P00033 


P00035 


P00046 


P0O0S1 


P00061 


P00065 


P00070 


P00072 


P00033 








P00001 


P00012 






P000S6 








P00005 


P00053 






P00010 








P00024 


P00031 


P00060 




P00073 








P00025 


P00032 






P00002 


P00041 






P00011 


P00023 


P00036 




P00064 









A-25 



COMPASS-32 (2.1) 



MAC 



11/21/66 PAGE 1 



EXTERNAL SYMBOLS 
CIO 



LENGTH OF SUBPROGRAM 00076 
LENGTH OF COMMON 00000 

LEN6TH OF DATA 00000 



COMPASS-32 



ll/?l/66 PAGE 
LlRM HEADS, REWIND.STATUS.FOKMaT 
*»»•»«»•»♦*••»»»♦•»»««*•»^^»»«»«»»»»*»»»»»*»»»»»»»»»»*»»»*«»•*»»»»«** , 

MAcHO EXAMPLES 



•••«»•**«« 



FORMAT 



00000 007777T7 00 1 X77777 3 

00001 01000016 01 00016 



00002 01000000 01 POOOOO 



00003 
00004 



40000026 40 
00000050 00 



P00026 
00050 



MACRO 




(LtR.FWA 


EXT 




CIO 


RTj 




CIO 


01 




L.X 


IFT 




/•/.R.l 


UJP 




*-2 


IFF 




/•/.R.l 


UJP 




R 


M 




FtfA 


C 




N 


IFF 




/0/.X.1 


00 




IA 


ENOM 






MACRO 




(L.R.X.l 


EX T 




CIO 


RTj 




CIO 


04 




L.X 


IFT 




/•/.H.l 


UJP 




»„2 


IFF 




/•/•"•l 


UJP 




B 


IFF 




/0/.X.1 


00 




IA 


ENOM 






MACRO 




1L.X) 


EXT 




CIO 


RTj 




CIO 


13 




L.X 


ENOM 






MACRO 




(L.R.X) 


EXT 




CIO 


RTj 




CIO 


14 




L.X 


IFT 




/•/.s.l 


UJP 




•-2 


IFF 




/•/.R.l 


UJP 




H 


ENr>M 






READS 




(14,*, I 


EXT C!Q 




RTJ CIO 




01 14 







IFT • 


•, 




UJP «-2 




IFF • 


«, 


1 


40 INBUFF 


40 







FWA,N,X.IA,M,C) 



MEADS 
HEADS 
HEADS 
HEADS 
HEADS 
HEADS 
HEAOS 
HEADS 



COMPASS-32 



00005 
00006 



00007 
00010 
00011 



A-26 



00013 
00014 



00016 
00017 



00021 
00022 
00023 
00024 
00025 
00026 



(2.1) 



00700000 00 1 X00O0O 3 
01200016 01 00016 2 



01000024 01 P00024 
40000026 40 P00026 
40000050 40 00050 



00012 00000022 00 P00022 



00700005 00 1 X00005 3 
04000016 04 00016 



00015 01000013 01 P00013 



00700013 00 1 X00013 3 
14200016 14 00016 2 



00020 01000016 01 00016 



77770000 77 1 70000 
01077777 01 77777 
01400022 01 1 P00022 
01077777 01 77777 
01400024 01 1 P00024 



INBuFF 



IFF 


0,0.1 






READS 


(14, 


REJX, 


EXT 


CIO 






RTj 


CIO 






01 


14*2 






IFT 


*»REJX,1 




IFF 


•»REJX,1 




UJP 


REJX 






40 


IN8UFF 






40 


to 






IFF 


0t2.1 






00 


INTAOO 






REMIND 


(14, 


•) 


EXT 


CIO 






RTJ 


CIO 






04 


14,0 






IFT 


•t»il 






UJP 


•-2 






IFF 


•»»,1 






IFF 


0,0,1 






FORMAT 


(14, 


14,2) 


EXT 


CIO 






RTj 


CIO 






14 


14,2 






IFT 


••14, 






IFF 


•»14, 






UJP 


14 






UCS 








UJP 




• • 




UJP 


I 


INTAOO 


UJP 




•• 




UJP 


I 


HEJX 




8SS 




40 




END 









11/21/66 PASE 



(14,REJX,INBUFF,40,2,1NT»OD,40,40) 



READS 
READS 
READS 
READS 
READS 
READS 
READS 
READS 
READS 
READS 



REWIND 
REMIND 
REWIND 
REWIND 
REWIND 
REWIND 
REWINO 



FORMAT 
FORMAT 
FORMAT 
FORMAT 
FORMAT 
FORMAT 



NUMBER OF LINES WITH DIAGNOSTICS 



COMPASS-32 

CIO 

INBUFF 
INTAOO 
REJX 



P00026 
P00022 
P00024 



MAC 
EXTERNAL 



POOOOO 


P00005 


P00003 


P00010 


P00012 


P00023 


P00007 


P00025 



ll/?l/66 PAGE 1 
P00013 P00016 



A- 27 



COMPASS-32 



EXAMPLE 26 (COPY) 



ll/?l/66 PAGE 



EXTERNAL SYMBOLS 
PRDRIVER 
CRORIVER 
MTDRIVER 



ENTRY-POINT SYMBOLS 

COPY 00000 



LEN6TH OF SUBPROGRAM 00112 
LENGTH OF COMMON 00000 

LENGTH OF DATA 00000 



COMPASS-32 



00005 14600054 14 1 P00054 2 

00006 13077755 13 77755 

00007 14600001 14 1 00001 2 

00010 13077771 13 77771 

00011 00777777 00 1 X77777 3 



»LE 26 (COPY) 11/21/66 PAGE 2 

ENTRY COPY 

EXT MTDRIVER. CRORIVER. PRnRIVER 
THIS SUBPROGRAM IS DESIGNED TO TEST THE DRIVERS THAT WERE WRITTEN 
PREVIOUSLY (EXAMPLE 25 AND WORKSHEET 8). IT COPIES A DECK OF HOLLERITH 
CARDS TO MaG TAPE. REWINDS THE TAPE ANo COPIES THE TAPE ON THE PRINTER. 

PROGRAM REPEATS ON RESTART UNLESS JUMP KEY 1 IS SET IN WHICH CASE 
IT WILL EXIT BACK TO SCOPE. 



00000 01077777 01 77777 COPY 



00001 14600010 14 1 00010 2 

00002 13077771 13 77771 

00003 14600001 14 1 00001 2 

00004 00777777 00 1 X77777 3 



ENA 
SHaQ 
ENA 
RTj 



NEXTCARD ENA 
SHAQ 
ENa 
SHAQ 
RTJ 



LINKAGE BACK TO SCOPE 



REWIND TAPE 1 



MTDRIVER 

READ NEXT CARD — — 

BUF 

-18 

1 

-6 

CRORIVER 

TEST FOR END OF FILE CARD 



PLACE FUNCTION CODE 

IN Q 23-1S (REWIND) 
PLACE TAPE NUMBER IN A 5- 



00012 
00013 



00014 
00015 
00016 
00017 
00020 
00021 



17600010 17 1 00010 2 
03100023 03 P00023 1 



14600054 14 
13077755 13 
14600003 14 
13077771 13 
14600001 14 
00700004 00 



1 P00054 

77755 

1 00003 

77771 

1 00001 
1 X00004 



00022 01000005 01 POOOOS 



ANA 
AZj.NE 



ENa 

SHAQ 

ENA 

SHAQ 

ENa 

RTj 

UJP 



10B 
FILEMARK 

OUTPUT CARD IMAGE TO MAG TAPE 1 

8UF 
-18 
3 



MTDRIVER 
NEXTCARD 



A-28 



COMPASS-32 



00023 
00024 
00025 
00026 



00027 
00030 
00031 
00032 



00033 
00034 
00035 
00036 
00037 
00040 



00041 
00042 



00043 
00044 
0004S 
00046 
00047 



(2.1) 



EXAMPLE 26 (COPY) 



14600015 14 1 00015 2 FILEMAHK ENa 

13077771 13 77771 SM A U 

14600001 14 1 00001 2 ENa 

00700021 00 1 X00021 3 RTj 



14600010 14 1 00010 2 

13077771 13 77771 

14600001 14 1 00001 2 

00700026 00 1 X00026 3 



14600054 14 1 P00054 2 NEXTREC 
13077755 13 77755 
14600001 14 1 00001 2 
13077771 13 77771 
14600001 14 1 00001 2 
00700032 00 1 X00032 3 



17600010 17 1 00010 2 
03100051 03 P00051 1 



14600054 14 1 P00054 2 

13077755 13 77755 

14600003 14 1 00003 2 

13077771 13 77771 

00777777 00 1 X77777 3 



ENa 

SMAU 

ENa 
RTj 



ENA 

SHAQ 

ENA 

SHAQ 

ENA 

RTj 



00050 01000033 01 P00033 



00051 77770000 77 1 70000 3 

00052 00100000 00 P00000 1 

00053 01000001 01 P00001 



ANA 
AZj.NE 



ENA 

SHAQ 

ENa 

SHaQ 

RTj 

IMP 



EXIT 



UCS 
SJl 
UJp 



11/31/66 PAGE 



CLOSE OUT MAG TAPE } KlTH A FM 

15B 
-6 

1 
MTDRIVER 

REWIND HAG TAPE 1 



10B 

-6 

1 

MTDRIVER 

READ NEXT RECORD FROM MAG TAPE 1 

BUF 

-18 

1 

-6 

1 

MTDRIVER 



TEST FOR ENO OF FILE — - 

10B 
EXIT 

OUTPUT RECORD TO PRINTER 

BUF 

-18 

3 

-6 

PRDRIVER 

NEXTREC 

EXIT PROCEDURE — 



COPY 
COPY*l 



COMPASS-32 



(2.1) 



EXAMPLE 26 (COPY) 

BUFFER AREA 

BUF BSS 30 

END COPY 
NUMBER OF LINES WITH DIAGNOSTICS 



11/21/66 PAGE 



A- 29 



COMPASS-32 (2 


1) 


auF 


P00054 


COPY 


P00000 


CKORIVER 




EXIT 


P00051 


FiLEMARK 


PU0023 


MTuKlVER 




NEXTCAHO 


POOJ05 


NExTHEC 


P00033 


PKUHIVER 





EXAMPLE 26 (COPY) 



EXTERNAL 
EXTERNAL 

EXTERNAL 



P00005 


PO0O14 


P00052 


P00053 


PO0011 




P00042 




P00013 




P00004 


P00021 


P00040 




P00022 




P00050 




P00047 





11/21/66 PAGE 1 
P00033 P000*3 



COMPASS-32 



VERSION SI 0.0 



12/07/64 



11/21/66 PAGE 



EXTERNAL SYMBOLS 
CO I 
ABNORMAL 



ENTRY-POINT SYMBOLS 

C1C 00000 

CIT 00044 



LENGTH OF SUBPROGRAM 00072 
LENGTH OF COMMON 00000 

LENGTH OF DATA 00000 



A-30 



COMPASS-32 



VERSION SI 0.0 12/07/6* 

• CEnIKAL INTERRUPT CONTROL PROCEDURE 



ll/?l/b6 PAGE 
REVISED 12-rt4-b* 



WHENEVER AN INTERRUPT OCCURS* THE HARDWARE 

1. DISABLES THE INTERHUPT SYSTEM 

2. REPLACES (00004, BITS U-On) W?TH THE LOCATION OF THE 
INTERRUPTER INSTRUCTION 

3. REPLACES (00005. BITS H-0n> *FTH AN lOFTlFYlNG CODE 

4. TRANSFERS CPU CONTHOL TO LOCATION 00005. 

SCnPE-32 LOADS THE FOLuO"ING LTNKAfiE Tn CIC 
(00004) UJP ft 
(Uft005) NOP 
(00006) UJP CIC 



CIC 
1. 
2. 
3. 



10. 
11. 
12. 
13. 



PERFORMS THE FOLLOWING TASkS 

LOGICALLY IGNORES AN INTERRUPT ON A DINT INSTRUCTION 

SAVES THE (Alt (Q). (HI). (B2> ANO (33) 

SETS LOCKOUT FLAG 10 IDENTIFY INTERRUPT PROCESSING 

TRANSFORMS INTERRUPT CODE INTO RELATIVE CIT ENTRY 

SETS ENTRY LOCATION (FROM cU) TO LINK TO USER 

SETS INCL INSTRUCTION FOR FXECuTION ON USER RETURN 

RESTORES ABNORMAL »D0R£SS TO CiT ENTRY 

ENTERS USER INTERRUPT PROCEDURE 

CLEARS NON-I/0 INTERRUPTS 

RESTORES LOCK-OUT FLAG 

RESTORES SAVED REGISTERS 

ENABLES INTERRUPT SYSTEM 

EXITS 10 INTERRUPTED PROGRAM 



00004 

00006 
00007 
00003 
00009 
00010 
00011 

00013 
00014 
00015 
00016 

00018 
00019 
00020 
00021 
00022 
00023 
00024 
00025 
00026 
00027 
0002S 
00029 
00030 
00031 
00032 



C0MPASS-32 



VERSION 
ENTRY 
EXT 



SI 0.0 1< 
CIC, CIT 
ABNORMAL. COI 



11/21/66 PAGE 



00000 45000045 45 P00045 CIC 



00001 
00002 
00003 
00004 
00005 


24400004 
37000043 
03100006 
20000045 
01400004 

47100047 
47200050 
47300051 

14477777 

40000044 

54100005 
17107777 
05100110 
01000040 
15177675 

20100044 
44000026 

12000006 
42000136 

14677777 
44100044 

00700026 

77500000 

14400000 
40000044 

54100047 
54200050 
54300051 
25000045 

77740000 
81400004 

17100007 
15100016 
01000020 


24 
37 
03 
20 
01 

47 
47 
47 

14 

40 

54 
17 
05 
01 
15 

20 

44 

12 

42 

14 

44 

00 
77 

14 
40 

54 
54 
54 
25 

77 
01 

17 
15 
01 


1 


G 
1 





1 















1 



1 
1 

1 








1 

1 






00004 
P00043 
P00006 
P00045 

00004 

P00047 
P00050 
P00051 

77777 

P00044 

00005 
07777 
00110 
P00040 
77675 

P00044 
P00026 

00006 
P00027 

X77777 
P00044 

P00026 

ooooo 
ooooo 

P00044 

P00047 
P00050 
P00051 
P00045 

40000 
00004 

00007 

00016 

P00020 





1 



1 

2 
3 





1 
1 
1 



1 
1 




2 

2 

1 

3 
1 




1 

2 

3 


3 



1 
1 





LCa.I 

lpa 

AZj.NE 

LDA 
UJP. I 


00006 
00007 
00010 


CIC2.1 


STl 

sri 

STl 


00011 

00012 




ENA.S 
STa 


00O13 
00014 
00015 
00016 
00017 

00020 
00021 


CIC5.0 


LUI 
AN I 
ISfi 
UJP 
INI 

LDA 
SWA 


00022 
00023 




SHA 
S*CH 


00024 
00025 




ENA 
SWA 


00026 


CICR.O 


HTj 


00027 


CIC9.0 


INCL 
REM 


00030 
00031 




EifA.S 
STa 


00032 
00033 
00034 
00035 




LOI 
LDI 
LDI 
LOaQ 


00036 
00037 




EInT 

UJP.I 


00040 
00041 
00042 


CIC4.1 


AN} 
INI 
UJP 



CIT*1 SAVE (A) ANO (0) 

LOGICALLY IGNORE INTERRUPT ON DINT - - 

4 ((4))* INTERRUPTED INSTRUCTION 

DINT MASK DINT INST (ZERO BITS 11 

CIC2.1 JUMP IF ((4)) NIT OINT 

CIT*i ELSf RESTORE iAi 

4 and exit. Interrupt disabled 
save registers incit ----------- - 

CITO.l SAVf (Bl) 
CIT*4,2 (82) 
CIT*5,3 (B3> 
SET LOCK-OUT FLAG ----- -------- 

-0 

CIT 

TRANSFORM INTERRUPT CODE TO RELATIVE CIT ENTRY - - 

S.l LOAD AND 

77778,1 MASK INTERRUPT CODE 

1108.1 SKIP IF NON-I/O INTERRUPT 

CIC4.1 ELSE GO PROCESS THEM 

-1028,1 COMPUTE INDEX RFLATIVE TO CIT 

SET USER ENTRY (FROM CIT) INTO RTJ --- - - 

CIT. I USER ENTRY LOCATION GOES 

CIC8.0 TO RTJ INSTRUCTION 

SET INCL MASK FOR CLFAKlNG INTERRUPT ------- 

6 CHARACTER CARRIES MASK 

CIC9.0*2 

RESTORE ABNORMAL ADDRESS TO CIT EnTRy - - 

ABNORMAL 

CIT.l 

ENTFR USER INTERRUPT PROCEDURE --- - - - 



0) 



CLEAR INTERRUPT IF NON-I/0 ---------- 

m aSk WILL BE ZERO ON I/O 

INTERRUPTS . CLEARED MTHIN CIO 

RESTORE LOCK-OUT FLAG ------------ 



CIT 

RESTORE SAVED REGISTFHS ---- ------ 

CIT*3,1 

CIT*4,2 

CIT*5,3 

CIT*1 

ENABLE INTERRUPT AND EXIT TO INTERRUPTED PROGRAM - 



00043 77730000 77 1 30000 3 DINT 



TRANSFORM I/O INTERRUPT CODE 

7,1 MASK CHANNEL BITS 

CITCH0-CIT.1 INCREASE IB1) Tn RELATIVE 

CIC5.0 CHANNEL ENTRY AND CONTINUE 

CONSTANTS AND CENTRAL INTERRUPT TaBLF - - - - - 



0003* 
00035 

00037 
00039 
00039 
00040 
00041 
00042 
00043 
00044 
00045 
00046 
00047 
000*8 
00049 
00050 
00051 
00052 
00053 
00054 
00055 
00056 
00057 
00053 
00059 
00060 
00061 
00062 
00063 
00064 
00065 
00066 
00067 
00068 
00069 
00070 
00071 
00072 
00073 
00074 
00075 
00076 
00077 
00078 
00079 
00080 
00081 
00082 
00083 
0008* 
00085 
00086 
00087 



COMPASS-32 



CIC 



77777777 



CIT 



VERSION SI 0.0 



OCT 
REM 



12/07/6* 



lt/21/66 PASE 



77777777 INTERRUPT LOCK-OUT FLAG. 

VALUE IS -0 «HEN INTERRUPT PROCESSING IN PROGRESS, 
INTERRUPT DISABLED, ANO IS *0 OTHERWISE 



O{)089 
O0O9O 
00091 
00092 
00093 
00094 



00045 


00000000 


00046 


00000000 


00047 


00000000 


OOOSO 


00000000 


00051 


00000000 



00052 
00053 
00054 
00055 
00056 
00057 
00060 
00061 



00062 
00063 
00064 
00065 
00066 
00067 
00070 
00071 



04000024 04 

20000052 20 

20000053 20 

10000054 10 

10000055 10 
40000056 40 
00000057 00 
00000060 00 



00077777 00 

00000062 00 

00000063 00 

00000064 00 

00000065 00 

00000066 00 

00000067 00 
00000070 00 



X00024 
X00052 
X00053 
X00054 
X00055 
X00056 
X00057 
X00060 



X77777 
X00062 
X00063 
X00064 
X00065 
X00066 
X00067 
X00070 



CITCHO 



{AS 

(U) 

(SI) 

<B2) 

(63) 



CONTENTS OF REGISTERS ON ENTRY TO CIC SAVED IN CIT AND 

RESTORED FROM THESE LOCATIONS 

OCT 

OCT 

OCT 

OCT 

OCT 

NON-I/O USER INTERRUPT LINKAGE CELLS. INCL MASK IS IN 
CHARACTER AND GOES INTO BIS ll-O* OF INCL INS TRUCTION. 
ADDRESS IS INITIALIZED TO ABNORMAL ANO RESToREn PRIOR TO 
ENTRY TO A USER ROUTINE. 

04 ABNORMAL CODE*0llfl REAL TIME CLOCK 
20 ABNORMAL Olll ARITHMETIC OVE»FLOW 

20 ABNORMAL 0112 OIvIDE FAULT 

10 ABNORMAL 0113 EXPONENT OVERFLOW 

10 ABNORMAL OlU 8C0 FAULT 

40 ABNORMAL OllS SEARCH/MOVE 

00 ABNORMAL Ollft MANUAL FROM CONSOLE 

00 ABNORMAL Oil? ADJACENT PROCESSOR 

I/O INTERRUPT LINKAGE CELLS. INCL MASK ACTS AS NOP - 
MUST BE GIVEN IN THE I/O INTERRUPT PROCEDURE. 
INITIALIZATION IS PERFORMED BY CIO. 
00 CDI CHANNEL 

00 CDI CHANNEL 1 

00 CDI CHANNEL 2 

00 CDI CHANNEL 3 

00 CDI CHANNEL 4 

00 COI CHANNEL 5 

00 COI CHANNEL 6 

00 CDI CHANNEL 7 

END 
NUMBER OF LINES rflTH DIAGNOSTICS 



ADDRESS 



00096 
00097 
00098 
00099 
00100 
00101 
00102 



00104 
00105 
00106 
00107 
00108 
00109 
00110 
00111 
00112 
00113 
0011* 
00115 
00116 
00117 
00118 
00119 
00120 
00121 
00122 
00123 
00124 
00125 
00126 
00127 



4PASS-32 (2 


1) 


CIC 


ABNORMAL 




EXTERNAL 


CDI 




EXTERNAL 


CIC2.1 
CIC4.1 
CIC5.0 
CICB.O 
CIC9.0 
CIT 


P00006 
P00040 
P00020 
P00026 
P00027 
P00044 




CITCHO 
DINT 


P00062 
P00043 




SYMBOLS NOT REFERENCED 




•CIC 


P00000 





VERSION SI 0.0 

P00024 00064 
P00055 00111 
P00061 00115 
P00062 00119 
P00066 00123 
P00003 00041 
P00016 00055 
P00042 00085 
P00021 00059 
P00023 00062 
P00000 00037 
P00010 00047 
P00031 00073 
P00035 00078 
P00041 00084 
P00002 00040 



12/07/64 



P00052 0010ft 
P00056 00112 



P00063 00120 
P00067 00124 



P00004 00042 
P00012 00050 
P00032 00075 
P00041 00084 



ll/?l/66 PAGE 



P00053 00109 
P00057 00113 



P00064 00121 
P00070 00125 



P00006 00045 
P00020 0005R 
P00033 0007<k 



P00054 00110 
P00060 00114 



P00065 00122 
PO0071 00126 



P00007 00046 
P00025 00065 
P00034 00077 



COMPASS-32 (2.1) 



MIMTCIO 



A-32 



11/? 1/66 PAGE 1 



EXTERNAL SYMBOLS 
CIO 



ENTRY-POINT SYMBOLS 

MTMTCIO 00000 



LENGTH OF SUBPROGRAM 00274 
LENGTH OF COMMON 00000 

LEN6TH OF DATA 00000 



COMPASS-32 



(2.1) 



11/71/66 PAGE 2 
THIS SUBPROGRAM COPIES A VARIABLE SIZE RECORD ImPUT TAPE (LOGI- 
CAL UNIT 14) TO ANOTHER TAPE C L OGIcAL UNIT 15) THt DENSITY OF 
THE OUTPUT TAPE WILL BE THE DENSITY SET BY THE OPERATOR. 
THIS SUBPROGRAM DOES NOT CHECK FOR TAPE ERRORS. PARITY IS 
CHfrCKEO ONLY TO INSURE THAT THE MOnE OF THE INPUT TAPE IS THE 
SAmE AS THE MODE SELECTED. 



00000 
00001 
00002 
00003 
00004 
00005 
00006 
00007 
00010 
00011 
00012 
00013 
00014 
00015 
00016 
00017 
00020 
00021 
00022 

00023 
00024 
00025 
00026 
00027 
00030 
00031 
00032 
00033 
00034 
00035 
00036 
00037 
00040 
00041 
00042 
00043 
00044 
00645 



01077777 
00777777 
04000016 
01000001 
00700001 
04000017 
01000004 
00700004 
14200016 
01000007 
00700007 
01000016 
01000012 
00000374 
40000764 
00700012 
13100016 
03200017 
17702010 



01 

00 1 
04 

01 

00 1 
04 

01 

00 1 
14 

01 

00 1 

01 



01 
00 
40 
00 1 
13 
03 
17 1 



77777 
X77777 3 

00016 
P00001 
X00001 3 

00017 
P00004 
X00004 3 

00016 2 
P00007 
X00007 3 

00016 
P00012 
P00077 

00764 
X00012 3 

00016 1 
P00017 2 

02010 3 



04700000 04 
01000046 01 
37000076 37 
31000015 31 
44000041 44 
22000041 22 
42000155 42 
00700017 00 
14000017 14 
01000032 01 
00700032 00 
02000017 02 
01000035 01 
00000374 00 
40000000 40 
00700035 00 
13100017 13 
03200042 03 
81060007 01 



00000 

P00046 

P00076 

P00015 

P00041 

P00010 

P00033 

X00017 

00017 

P00032 

X00032 

00017 

P00035 

P00077 

00000 

1 X00035 

00017 

P0U042 

o poooot 



MODE 



OUTMOOE 



ENTHY 

EX T 

UJP 

RTj 

04 

UJP 

RTJ 

04 

UJP 

HTj 

14 

UJP 

HTJ 

01 

UJP 

00, C 

40 

RTj 

13 

AZj»GE 

ANQ 

USF 

UJP 

LPA 

SUA 

S«A 

LACH 

SACH 

RTj 

14 

UJP 

RTj 

02 

UJP 

00, C 

40 

HTj 

13 

aZj.GE 

UJP 



MTMTCIO 
CIO 

•• 
CIO 

1* 

•-2 
CIO 
15 
*-2 

CIO 

14.2 

• -2 

CIO 

14 

*-2 

INBUFF 

500 

CIO 

14.1 

*-2 

2010B 



TEST 

MASK 

FCA 

NOC 

MODE+1 

OUTMOOEM 

CIO 

15,0 

•-2 

CIO 

15 

•-2 

INBUFF 



CIO 

15,1 

•-2 

MOQE-l 



REMINO INPUT TAPE 



KEHTND OUTPUT TAPE 



ASSUME AND SET INPUT TAPE TO 

BINARY MODE (MOOE MAY BE CHANGED 

LATER) 

INITIATE READING INPUT RECORO 

FHOm LOGICAL UNIT 14 (MAX RECORD 

SIZE IS 500 CHAHACTERS) 



WAIT UNTIL THE INPUT IS COMPLETE 



MASK OUT EVERY SATAUS BIT EXCEPT 
EOF AND PARITY 

WAS THERE AN EOF OR PARITY ERROR 
YES JUMP TO TEST. 
AFTFR STATUS REQUEST (A) a LCA»1 
CALCULATE NUMBER OF INPUT CHAR- 
ACTERS AND STOHE IN OUTPUT 
FETCH MODE OF ImPUT RECORO AND 
SIORE TO SET OUTPUT MODE THE 
SAMF AS INPUT. 



INITIATE WRITING OUTPUT BUFFER 



"AIT UNTIL OUTPUT IS COMPLETE 
LOOP TO READ NEW INPUT RECORD 



00046 17700010 17 1 

00047 O470OUO0 04 1 

0U050 01000U61 01 



00010 3 
00000 3 

P00061 



ANQ 
OSF 
UJP 



WAS AN EOF HfAO 
YfcS JUMP TO EOF 



A-33 



-32 


(2,1) MTMTCIO 






00051 


77770000 77 1 70000 3 




UCS 




00052 


00700042 00 1 X00042 3 




RTj 


eio 


00053 


06000016 06 00016 




06 


14 


00054 


01000052 01 P00Q52 




UJP 


*-2 


00055 


22000041 22 POOOIO 1 




LAcH 


MOOE+1 


000S6 


16600030 16 1 00030 2 




XOA 


308 


00057 


42000041 42 POOOIO 1 




SACH 


MOOE*l 


00060 


01000007 01 P00007 




UJP 


MOOE-1 


00061 


00700052 00 1 X00052 3 


EOF 


RTJ 


CIO 


00062 


11000017 11 00017 




11 


IS 


00063 


01000061 01 P00061 




UJP 


•«2 


00064 


77700000 77 1 00000 3 




SLS 




00065 


00100067 00 P00067 1 




SJ1 


EXIT 


00066 


0*000007 01 P00007 




UJP 


MODE-1 


00067 


00700061 00 1 XQQ061 3 


EXIT 


RTJ 


CIO 


00070 


05000016 05 00016 




05 


14 


00071 


01000067 01 P00067 




UJP 


»-2 


00072 


00700067 00 1 X00067 3 




RTJ 


CIO 


00073 


05000017 05 00017 




05 


15 


00074 


01000072 01 P00072 




UJP 


*-2 


00075 


01400000 01 1 POOOOO 




UJPtI 


MTMTCIO 


00076 


00377777 


MASK 


OCT 


377777 


00077 




INBUFF 


BSsiC 
END 


500 
MTMTCIO 



ll/?l/66 PAGE 3 
IF PARITY ERROR STOP SO THE 
OPERATOR MAY DECIDE IF IT IS A 
LEGAL PARITY ERROR OH WRONG MOOE 

BACKSPACE INPUT TAPE A RECORD 

FETCH ASSUMED MODE ANO 
CHANGE IT. 

SET NEW MODE IN SEL CALL AND 
TRY AGAIN. 



WRITE EOF ON OUTPUT TAPE 



STOP IF SELECTIVE STOP SWITCH 

SET ON CONSOLE. 

EXIT AND UNLOAD TAPES IF JUMP 

KEY 1 IS SET, ON CONSOLE. 

If NOT JUMP TO oEAO INPUT RECORD 



UNLOAD INPUT TAPE 



UNLOAD OUTPUT TAPE 



EXIT TO SCOPE 



NUMBER OF LINES WITH DIAGNOSTICS 



COMPASS-32 (2. 


1) 


MTMTCIO 








ll/?l/66 PAGE 


CIO 




EXTERNAL 


P00001 


P00004 


P00007 


P00012 






P00017 


P00032 


P00035 


P00042 








P00052 


P00061 


P00067 


P00072 


EOF 


P00061 




POOOSO 








EXIT 


P00067 




P00065 








FCA 


P00015 




P00026 








INBUFF 


P00077 




P00015 


P00040 






MASK 
MODE 


P00076 
POOOIO 




P00025 
P00030 
P00060 


P00045 
P00066 


P00055 


P00057 


MTMTCIO 


POOOOO 




P00075 








NOC 


P00041 




P00027 








OUTMODE 


P00033 




P00031 








TEST 


P00046 




P00024 









COMPASS-32 (2.1) 



A-34 



TYPEIN 



ll/?l/66 PAGE 1 



ENTRY-POINT SYMBOLS 

TYPEIN 00000 



LENGTH OF SUBPROGRAM 00027 
LENGTH OF COMMON 00000 

LENGTH OF DATA 00000 



COMPASS-32 



(2.1) 



TYPEIN 11/21/66 PAGE 

TKJ3 SUBROUTINE »LlOwS FOR TtPlNG IN A VARIABLE QUANTITY OF 
FOUR DECIMAL DIGIT NUMBERS. THE INPUT IS TERMlN»TEl) WHEN A 
PERIOD IS TYPED IN. THE CALLING SEQUENCE IS. 
CALL (P) ■ RTJ TYPEIN 

CP*1>" RETURN 

(A) »FIRST CHARACTER ADDRESS OF INPUT BUFFER 



OUTPUT <B1>» NUMBER OF NUMBERS 

















ENTRY 


TYPEIN 


00000 


01077777 


01 





77777 





TYPEIN 


UJP 


•• 


00001 


14100000 


14 





00000 


1 




ENI 


0.1 


00002 


46000020 


46 





P00020 







SChA 


CKPERIOD 


0U003 


46000010 


46 





POOOIO 







SChA 


SET23 


00004 


15400004 


15 


1 


00004 







INAtS 


4 


00005 


77600400 


77 


1 


00400 


2 




PADS 


400B 


00006 


01000005 


01 





P00005 







UJP 


•-1 


00007 


53420033 


53 


1 


20033 







TAm 


33B 


00010 


11377777 


11 





77777 


3 


SET23 


echa 


•• 


00011 


53420023 


S3 


1 


20023 







TAm 


338 


00012 


77750000 


77 


1 


50000 


3 




CTl 




00013 


77602000 


77 


1 


02000 


2 


LOOP 


PAuS 


2000B 


0001* 


01000016 


01 





P00016 







UJP 


FINISH 


0001S 


01000010 


01 





P00010 







OJP 


SET23 


00016 


77601000 


77 


1 


U1000 


2 


FINISH 


PAuS 


loooa 


00017 


01000013 


01 





P00013 







UJP 


LOOP 


00020 


22377777 


22 





77777 


3 


CKPERIOU 


LACH 


•• 


00021 


04600033 


04 


1 


00033 


2 




as e 


338 


00022 


01000024 


01 





P00024 







UJP 


BYPASS 


00023 


01400000 


01 


1 


POO0O0 







UJP. I 


TYPEIN 


00024 


15100001 


15 





00001 


1 


BYPASS 


INI 


1<1 


00025 


53020033 


53 





20033 







TM A 


33B 


00026 


01000002 


01 





F00002 







UJP 
ENQ 


TYPEIN*2 



CLEAR Bl 

SAVE INPUT PAR. 

IS THE TYPEWRITER BUSY 

YES LOOP 

SET (.AST CHARACTER A0ORESS*l OF 

INPUT BUFFER INTO REGISTER FILE 

LOCATION 33B. 

SET FIRST CHARACTER ADDRESS INTO 
REGISTER FILE LOCATION 238. 
SET TYPE IN 

HAS THE REPEAT SWITCH ON TYPE- 
WRITER BEEN PUSHEO-YES JUMP TO 
ADDRESS SET23 ANd START OVER- 
NO jump to finish, 
has the finish switch been 

pUSHfO-NO JUMP TO LOOP. 

IS THE first character a PERIOD- 
yES EXIT-NO JUMP TO BYPASS 

increase bi by l 

SET NEW INPUT BUFFER AND LOOP 

TO TYPEIN*2 



NUMflER OF LINES WITH DIAGNOSTICS 



A-35 



UMP6S>S-J<2 


(2 


1) 


TYPtIN 






BYPASS 




P000?4 




P0U022 




CKPfcHIOD 




P00020 




POUOO? 




FINISH 




P00016 




P00O14 




LOUP 
SET23 




P00013 
P00010 




P00017 
P00003 


P00015 


TYPtIN 




P00OO0 




P00023 


P00026 



\\/?l/bb PAGE 



COMPASS-32 



11/^1/66 PAGE 



ENTRY-POINT SYMBOLS 

SOKT 00000 



LENGTH OF SUBPROGRAM 00030 
LENGTH OF COMMON 00000 

LENGTH OF DATA 00000 



COMPASS-32 



Tu . e „ ll/?l/66 PAGE 2 

THIS SUBPROGRAM SORTS A BLOCK OF NUMBERS INTO ASCENDING ORDER. 

upnN entry the address of the first number is located in the 

LOwER 15 BITS OF THE A REGISTER AND THE NUMBER OF NUMBERS IS IN 



A-36 



CALL (P) «RTJ SORT 

(P*1)»RETURN 

(A) "ADDRESS OF THE FIRST NUMBER 
(Bl) -NUMBER OF NUMBERS 



00000 
0UO01 



01077777 01 77777 
44000010 *4 P00010 



00002 53640000 53 1 A0000 2 



00003 


15277776 


IS 





77776 


2 


00004 


47200022 


47 





P00022 


2 


00005 


15277776 


15 





77776 


2 


00006 


47200024 


47 





P0002A 


2 


00007 


47100026 


47 





P00026 


1 


00010 


14177777 


14 





77777 


1 


00011 


53100000 


53 





00000 


1 


00012 


15600001 


15 


1 


00001 


2 


00013 


53600000 


53 


1 


00000 


2 


00014 


21100000 


21 





00000 


1 


00015 


20200000 


20 





00000 


2 


00016 


03600022 


03 


1 


P00022 


2 


00017 


41200000 


41 





00000 


2 


00020 


40100000 


40 





00000 


1 


00021 


13000030 


13 





00030 





00022 


10277777 


10 





77777 


2 


00023 


01000015 


01 





P00015 





00024 


10177777 


10 





77777 


1 


00025 


01000011 


01 





P00011 





00026 


14177777 


14 





77777 


1 


00027 


01*00000 


01 


1 


POOOOO 






INIT 



INLOOP 
OUTLOOP 



BSAvE 



ENTRY 


SORT 


UJP 


•• 


SWA 


INIT-1 


IAI 


2 


INI 


-lt2 


STl 


INLOOP. 2 


INJ 


-1.2 


STl 


OUTLO0Pi2 


STl 


BSAVE, 1 


ENi 


#»,! 


TU 


1 


INA 


1 


TAI 


2 


LOo 


0,1 


LDA 


0,2 


AUj.GE 


INLOOP 


STQ 


0,2 


STa 


0,1 


SHaQ 


24 


isi 


»»,2 


UJP 


LOOP 


ISI 


••,1 


UJP 


INIT 


ENI 


•«,1 


UJPtI 


SORT 


END 





SAVf FIRST WORD ADDRESS OF OATA 

BLOCK. 

ADD FIRST WORD ADORESS TO NUMBER 

OF ENTRIES TO CALCULATE LAST 

WORD ADDRESS«1 nF INPUT BLOCK. 

SET LIMIT OF INLOOP PASSES 

SET LIMIT OF OUTLOOP PASSES 
SAVf. (Bl) 

ENTF.R Bl WITH FIRST WORD ADDRESS 
OF INPUT BLOCK 

SET B2 EQUAL TO (Bl > *1 

LOAD Q WITH FIRST NUMBER FOR 

THIS PASS. 

LOAD A WITH NEXT NUMBER 

IS » GE YES JUMP TO INLOOP 

IF (A) WAS LESS THAN <U) SWAP 

THE REGISTER ANn ALSO SWAP THEM 

IN CORE. 



NUMBEN OF LINES WITH DIAGNOSTICS 



COMPASS-32 (2.1) 


BSAVE 


P00026 


INIT 


P00011 


INLOOP 


P00022 


LOOK 


P00015 


OUTLOOP 


P00024 


SOHT 


POOOOO 



11/71/66 PAGE 



P00007 
P000O1 
P00004 
P00023 
P00006 
P00027 



P00025 
P000I6 



A-37 



COMPASS-32 (2.1) 



TYPEOUT 



ll/?l/66 PAGE 1 



ENTRY-POINT SYMBOLS 

TYPEOUT 00000 



LENGTH OF SUBPROGRAM 00010 
LENGTH OF COMMON 00000 

LENGTH OF DATA 00000 



COMPASS-32 



TYPEOUT 



00000 
00001 
00002 
00003 



01077777 01 77777 
77600*00 77 1 00400 2 
01000001 01 P00001 
53420023 53 1 20023 



00004 53140000 53 400OO 1 



00005 
00006 
00007 



53420033 53 1 20033 
77760000 77 1 60000 3 
01400000 01 1 P00000 



TYPEOUT 



11/21/66 PAGE 
THIS SUBROUTINE ALLOWS FOR TYPING OUT A VARIBLE NUMBER OF 
CHARACTERS. THE CALLING SEQUENCE IS. 

CALL (A) "FIRST CHARACTER ADDRESS OF OUTPUT BUFFER 
(31) aNUMBER OF CHARACTERS IN OUTPUT BUFFER 
(P) aRTJ TYPEOUT 
<P*1)»RETURN 



is the typewriter busy 

YES LOOP AND WAIT UNTIL NOT BUSY 
TRANSFER FIRST CHARACTER ADDRESS 
JNTO REGISTER FILE LOCATION 23B. 
CALCULATE LAST CHARACTER ADDRESS 
.1 By ADOING (A) ANO (81). 
TRANSFER LCA*1 INTO RF 33B 
SET TYPE OUT 



NUMBER OF LINES WITH DIAGNOSTICS 



ENTRY 


TYPEOUT 


UJP 
PAuS 
UJP 
TAM 


•« 

400B 
»-l 
23B 


AU 


1 


TAM 
CTO 
UJPtI 
ENO 


33B 
TYPEOUT 



A-38 



COMPASS-32 2,1) 

TYfEOUT P000OO 



TYPEOUT 



11/21/66 PAGE 



P00007 



COMPASS-32 (2,1) 



11/21/66 PAGE 1 



ENTBY'POINT SYM80LS 

FLOATF OOOOO 
FLOAT OOOOO 



LENGTH OF SUBPROGRAM 00025 
LENGTH OF COMMON 00000 

LENGTH OF DATA 00000 



:ompass-32 



A-39 



fLOATF llV?l/66 PAGE 2 

THIS SUBPROGRAM CONVERTS AN INTEGER NUMBER INTO FLOATING POINT 
FORMAT. UPON ENTRY THE ADDRESS OF THE INTEGER NUMBER IS LOCATED 
IN THE LOWER 15 BITS OF P*l. 

CALL (P) * RTJ FLOATF 

(P*l)» ADDRESS OF THE INTEGER NUMBER 
<P*2>= RETURN 

OUTPUT <AQ>* FLOATING POINT EQUIVALENT OF THE INTEGER NUMBER 















ENTRY 


FLOAT. FLOATF 


00000 


01077777 


01 


77777 





FLOATF 


UJP 


«« 








00000 




FLOAT 


EUU 


FLOATF 


00001 


47100021 


47 


P00021 


1 




STl 


FOUT.l 


00002 


54100000 


54 


P00000 


1 




LOI 


FLOATF.l 


00003 


20500000 


20 


1 ooooo 


1 




LOa»1 


0.1 


00004 


15100001 


15 


00001 


1 




INI 


1.1 


00005 


47000022 


47 


P00022 







STl 


EXIT 


00006 


13077747 


13 


77747 







SHaQ 


-24 


00OO7 


03400021 


03 


1 P00021 







AQJ.EQ 


FOUT 


00010 


400t»0023 


40 


P00023 







STA 


MASKO 


00011 


135O2057 


13 


1 02057 


1 




SCaQ 


20578.1 


00012 


13077764 


13 


77764 







SHaQ 


-11 


00013 


41000024 


41 


P00024 







STq 


TEMP 


00014 


13077763 


13 


77763 







SHAQ 


-12 


0001S 


S3100000 


S3 


00000 


1 




tia 


1 


00016 


36000023 


36 


P00023 







SCA 


MASKO 


0001T 


13000014 


13 


00014 







shaQ 


12 


0.0020 


21000024 


21 


P00024 







lOq 


TEMP 


00021 


14177777 


14 


77777 


1 


FOUT 


ENi 


••.1 


00022 


01077777 


01 


77777 





EXIT 


UJP 


•• 


00023 


. 


30000000 




MASKO 


OCT 





00024 










TEMP 


SSS 
END 


1 



Equate float to floatf 
savf Bl 

LOAD Bl WITH ADDRESS OF INTEGER 
LOAo A WITH INTEGER NUMBER 
INCREASE AND SET RETURN AOORESS 
TO P»2 OF CALLING ROUTINE 

010 THE INPUT NUMBERsO YES EXIT 
SAVf SIGN OF INPUT NUMBER 
NORMALIZE THE INTEGER BY USING, 
THE SCALE INSTRUCTION 
MERGE THE EXPONENT AND BIAS 
(CONTENTS OF 81) WITH THE 
MANTISSA 



COMPLEMENT EXPONENT ANO BIAS IF 
THE INPUT NUMBER WAS NEGATIVE. 



JUMBER OF LINES. WITH DIAGNOSTICS 



ASS-32 


(2 


1) 


EXIT 




P00022 


FLOATF 




P000O0 


FOUT 




P00021 


MASKO 




P00023 


TEMP 




P00024 



FLOATF 



ll/?l/66 PAGE 



P00005 




P00000 


P00002 


P00001 


P00007 


POOOIO 


P00016 


P00013 


P00020 



SYMBOLS NOT REFERENCEO 

•FLOAT POOOOO 



COMPASS-32 (2.1) 



A- 40 



ll/?l/66 PAGE 1 



ENTRY-POINT SYMBOLS 

CROTP 00000 



LENGTH OF SUBPROGRAM 00121 
LENGTH OF COMMON 00000 

LENGTH OF DATA 00000 



COMPASS-32 



11/? 1/66 PAGE J 

this subprogram copies a file of c*ros from a card reaoercunit 
0. controller 3. on channel 0) to a tape unit (u'ht 1. controller 
on channel 11.thi5 subprogram oofs not check for card or 

TAPE ERRORS, THE mOOE OF EACH TaPE RECORO IS DETERMINED BY THE 
MOoE OF THE CARD RECORD. THE OFNSlTY OF THE OUTPUT TAPE WILL 

BE THE nENSITY SET BY THE OPERATOR. 



00000 
00001 
00002 
00003 
OOoOt 
00005 
00006 

oooor 

00010 
0001,1 
00012 
00013 
00014 
00015 
00016 
00017 
00020 
00021 
00022 
00023 
0002* 
00025 
00026 
00027 
00030 
00031 

00032 
00033 
0003» 
00035 
00036 
00037 
00040 



0*1 
000*2 
000*3 



00U** 
000*5 
0UO*6 



01077777 
77003000 
01000001 
77010001 
01000003 
77110010 
01000005 
77200000 
17600003 
0*600001 
01000007 
7*000121 
00000051 
01000013 
7 7200002 
01000316 
77200.IH 
010000*1 
77200010 

nioooo** 

1*600002 
*2000133 
77110000 
01000026 
5302U000 
12077775 



01 
77 
01 
77 
01 
77 
01 
77 
17 1 
0* 1 
01 
7* 

00 

01 
77 
01 
77 
01 
77 
01 
1* 1 
*2 
77 
01 
53 
12 



**000033 ** 

76077777 76 

10000051 10 

01000U33 01 

77210002 77 

01000036 01 

010000U7 01 



77777 

03000 

P00001 

10001 
P00003 

10010 1 
P00005 

00000 2 
00003 2 

00001 2 
PO0007 
P00121 
P00051 
P0O013 

00002 2 
P00016 

0000* 2 
P000*1 

00010 2 
POOO** 

00002 2 
P00026 3 

10000 1 
P00026 

20000 

77775 

P00033 

77777 U 

P000S1 

P00033 

10002 2 
P00036 
P00007 



1*600001 1* 1 00001 2 
*2000133 *2 P00026 3 
01000U26 01 P00026 



77110015 77 10015 1 
010000** 01 POOO** 
771101)11 77 10011 1 



ENTKY 
CKOTP UJP 
CON 
UJP 
CON 
UJP 
SEL 
UJP 
INPUT COPY 
ANA 
AS£ 
UJP 
INp* 

UJP 
EXS 
UJP 
EXS 
JJP 
EXS 
UJP 
EN* 
SACH 
SELMODE SiEL 
UJP 
tMa 
SHA 

Swa 

OUTPUT OUT" 

UJP 
EXS 
UJP 
UJP 



CROTP 

•• 

3000H.0 

, *-l 
18,1 
*-l 
108,1 
»-l 


3B 
18 

INPUT 
0,8UFF,BUFF**0 

*-2 

24.0 

•-1 

*R.0 
rtlNA^Y 

ln«,o 

EOF 

2B 

SELM()OE*3 

0.1 

•-1 



OUTPUT 
1«BUFF.»« 

*-2 
2B.1 
*-l 
INPUT 



CONNECT CARD REAOER ON CHANNEL 
CONNECT OUTPUT TaPE ON CHANNEL 
rEwInD OUTPUT TAPE 

is The Card reader ready and 

NOT BUSY. YES INITIATE INPUT- 
NO LOOP UNTIL IT BECOMES HEADY 
ANU nOT BUSY. 
INITIATE READING A blNARY OR 

BCU CARD. 

wAIT UNTIL THE CaRD REAOER 

BECOMES NOT BUSY. 

WAS THE CARD JUST READ A BINARY 

CArtU YES JUMP TO B1NAWY. 

WAS A FILE CAPO OEAU (ROW 7 ANU 

B PUNCHED) YES J' IMP TO EOF 

SET BCD MODE FOR OUTPUT TAPE. 



FETCH LAST CHARACTER ADORESS*l 

ANU CHANGE IT TO LAST WORD 

AUURFSS+1 

STURf AUDR IN OUTPUT INSTRUCTION 

INITIATE WRITING OUTPUT BUFFER 



jAIT UNTIL THE OmTPuT TAPE 
hECOmES NOT BUSY 



a ••••••»••••••••««••••••«•«•••••••»«»•*•••««••••«•««««•«•«••••»•«•»••««••••««• ii 

BINARY ENA 1 SEI BINARY MOnE FOR OUTPUT TAPE. 

SACH SELMODE* 1 
UJP SELMODE 

ae«»«ao»a»««a»»att«Ae«a*«»«»a»«a««««ft«a*aa**a«Ott»»««*a«a««««a«a*a«*«»»«*«»«*it**« 

t«.«t.t«<ll«.<.i«.««ttt«ttl.t..«l<«t».ll<ltttM«tl«lt><lt«<ttt>tt«llf»«ll)..«l.<>« 

EuF SEl 15B. 1 ^RlTp EOF ON nUTPUT TAPE 

UJe *-l 

SfcL 118.1 INLOaD OUTPUT TAPE UNIT 1) 



A-41 



COMPASS-32 (2.1) CRDTP 

00047 01000046 01 P00046 

00050 01400000 01 1 POOOOO 

00051 BUFF 



ll/?l/66 PAGE 



UJP 


•-1 


UJPtI 


CRDTP 


BSS 


40 


END 


CRDTP 



FXJT to scope 



NUMBER OF LINES WITH DIAGNOSTICS 






COMPASS-32 


(2.1) 


BINARY 


P00041 


BUFF 


P00051 


CRDTP 


POOOOO 


EOF 


P00044 


INPUT 


P00007 


OUTPUT 


P00033 


SELMOOE 


P00026 



1 1/21/66 PAGE 1 



P00021 
P00013 
P00050 
P00023 
P00012 
P00032 
P00025 



P00013 

P00040 
P00042 



COMPASS-32 (2.1) 



A-42 



ll/?l/66 PAGE 1 



ENTRY-POINT SYMBOLS 

MTHT 00000 



LENGTH OF SUBPROGRAM 00256 
LENGTH OF COMMON 00000 

LENGTH OF DATA 00000 



COMPASS-32 



11/21/66 PAGE 2 
THIS SUBPROGRAM COPIES A VARIABLE SIZE RECORD INPUT TAPE <UNIT 
I. CONTROLLER 0. ON CHANNEL 0> TO ANOTHER TAPE (UNIT 2. CONTROL 
LER O.ON CHANNEL 1). THE DENSITY OF THE OUTPUT TAPE WILL BE THE 
OENSITY SET BY THE OPERATOR. 

THIS SUBPROGRAM DOES NOT CHECK FOR TAPE ERRORS. PARITY IS 
CHECKED ONLY TO INSURE THAT THE MODE OF THE INPUT TAPE IS THE 
SAhE AS THE MODE SELECTED. 



00000 
00001 
00002 
00003 
00004 

oooos 

00006 
00007 
00010 
00011 
00012 

00013 
OOOU 
00015 

00016 
00017 
00020 
00021 
00022 
00023 
00024 



00026 
00027 
00030 
00031 
00032 
00033 
00034 
00035 
00036 
0U037 



01077777 01 
77000001 77 
01000001 01 
77010002 77 
01000003 01 
77100010 77 
01000005 01 
77110010 77 
01000007 01 
77100001 77 
01000011 01 

73001270 73 
00000304 00 
01000013 01 

77200002 77 
01000016 01 
77200010 77 
01000047 01 
77202000 77 
01000040 01 
53020000 53 



77777 

00001 
P00001 

10002 
P00003 

00010 
P00005 

10010 
P00007 

00001 
P00011 



00002 
P00016 

00010 
P00047 

02000 
P00040 

20000 



P00256 
P0Q061 
P00013 



00025 46000032 46 P00032 



22000047 22 
42000143 42 
77U0000 77 
01000030 01 
75377777 75 
10000304 10 
01000032 01 
77210002 77 
01000035 01 
01000011 01 



P00011 3 
P00030 3 

10000 1 
P00030 

77777 3 
P00061 
P00032 

10002 2 
P00035 
P00011 



MODE 



OUTmODE 



ENTRY 

UJP 

CON 

UJP 

CON 

UJP 

SEl 

UJP 

SEl 

UJP 

SEl 

UJP 

INPC 

UJP 

EXS 
UJP 
EXS 
UJP 
EXS 
UJP 
TM A 

SChA 

LACH 

SACH 

SE L 

UJP 

OUTC 

UJP 

EXS 
UJP 
UJP 



MTMT 

•• 

18.0 

*-i 

28,1 

•-1 

108,0 

•-1 

108,1 

•-1 

18,0 

«-l 

O.INBUFF.INBUFF 

»-2 

28.0 

•«1 

108,0 

EOF 

20008,0 

SETMQOE 



OUTPUT 

MO0E*3 

QUTM0DE*3 

0.1 

*-l 

1,INBUFF,»* 

•-2 

28,1 

•-1 
*ODE 



CONNECT INPUT TAPE (UNIT 1) 

ON CHANNEL 

CONNECT OUTPUT TAPE (UNIT 2) 

ON CHANNEL 1 

BEHIND INPUT TAPf 

REWIND OUTPUT T»PE 

ASSUME AND SET INPUT TAPE TO 
BINARY MODE (MODE MAY BE CHANGED 
LATER). 
►500 REAO INPUT RECORD FROM TAPE UNIT 

1 (H*X RECORD SIZE IS 500 

CHARACTERS) 

WAIT UNTIL INPUT IS COMPLETE 

WAS AN EOF READ 

YES JUMP TO EOF 

WAS THERE A PARITY ERROR 

yES JUMP TO CHANGE MODES 

FETCH LAST CHARACTER ADDRESS OF 

INPUT RECORDM 

STORE CHARACTER »ODRESS IN OUT- 

PUT INSTRUCTION. 

FETCH MODE OF INPUT RECORD AND 

STORE TO SET OUTPUT MODE THE 

SAME AS INPUT 

INITIATE WRITING OUTPUT RECORD 



WAIT UNTIL OUTPUT IS COMPLETE 
LOOP TO REAO NEW INPUT RECORD 



*#***•••»•• •*•••••••*«,> >••••#•« •••••*•#•••#•• ##»••••*•••»•«•*•• *•»»«•#»•»»»»»»• 



00040 
00041 



77770000 77 1 70000 3 SETmODF UCS 



77100012 77 00012 1 



SE L 



IF PARITY error stop SO the 
OPERATOR MAY DECIDE IF IT IS A 
LEGAL PARITY ERR^R OR WRONG MODE 
RACKSPACE INPUT TAPE A RECORD 



A-43 



COMPASS-32 

000*2 
00043 
00044 
00045 



00047 
00050 
00051 



00054 
00055 
00056 
00057 
00060 
00061 



(2.1) 

01000041 01 
22000047 22 
16600003 16 
42000047 42 



P00041 

P00011 

00003 

P00011 



77110015 77 
01000047 01 
77700000 77 

00100054 00 

01000011 01 



77100011 77 
01000054 01 
77110011 77 
01000056 01 
01400000 01 



10015 

P00047 

00000 



00046 01000011 01 P00011 



P00011 



00011 1 
P0Q05* 
10011 1 

P00056 

1 POOOOO 



UJP 


*-l 


LAcH 


M0DE*3 


XOa 


3 


SAcH 


MODEO 



ll/?l/66 PAGE 3 

FETCH ASSUMED MOnE ANO 
CHANGE IT 

SET NEW MODE IN SEL INSTRUCTION 
iNO TRY AGAIN, 
UJP MODE 

EOF SEL 15Bil WRITE EOF ON OUTPUT TAPE 

UJP *-l 
SLS STOP IF SELECTIVE STOP SWITCH 

SET ON CONSOLE. 
SJl EXIT EXIT ANO UNLOAD TAPES IF JUMP 

KEY i IS SET ON CONSOLE. 
JJP MOOE If NOT JUMP TO READ INPUT RECORO 



EXIT 



SE L 


llB.n 


UJP 


*-l 


SE L 


118.1 


UJo 


•-1 


UJP. I 


MTMT 


SSS.C 


500 


ENO 


MTMT 



UNLOAD INPUT TAPE 
UNLOAD OUTPUT TAPE 
FXIT TO SCOPE 



NUMBER OF LINES WITH DIAQNOSTICS 



COMPASS-32 

EOF 
EXIT 
INBUFF 
MODE 



(2.1) 



ll/?l/66 PAGE 



P00047 
P00054 
P00061 
P00011 



MTMT POOOOO 

OUTMODE P00030 

OUTPUT P00032 

SETMODE P00040 



P00021 
P00052 
P00013 
P00026 
P00046 
P00060 
P00027 
P00025 
P00023 



P00013 
P00037 
P00053 



P00032 
P00043 



A-44 



COMPASS-32 (2,1) 



11/21/66 PAGE 1 



ENTRY-POINT SYMBOLS 

CVTBCDB 00000 



LENGTH OF SUBPROGRAM 00017 
LEN6TM OF COMMON 00000 

LENGTH OF DATA 00000 



COMPASS-32 



(2.1) 



CVTBCOB 



ll/?l/66 PAGE 2 
THIS SUBPROGRAM CONVERTS A POSITIVE FOUR CHARACTER SCB NUMBER 
TO A 24 BIT BINARY NUMBER. 

CAUL (P) *RTJ CVTBCCB 
<P*U)xHETURN 
(A) -THE FOUR CHARACTER nCD mUMBER 



OUTPUT <A)»24 BIT BINAHY NUMBER 
CVTBCOB 



00000 
00001 
00002 
00003 
00004 

00005 
00006 
00007 

0U010 
0OO11 
00012 
00013 
0001* 
00015 



01077777 01 77777 CvTBCOH 

40000015 40 P00015 

47200013 47 P00013 2 

14200000 14 00000 2 

22000064 22 P00015 

50000016 50 P00016 LOOP 

15200001 15 00001 2 

23400064 23 1 P00015 



53040000 53 
04200003 04 
01000005 01 
14277777 14 
01400000 01 



40000 
00003 

P00005 
77777 

P00000 



ENTRY 

UJP 

STa 

ST I 

ENi 

LACH 

MUA 
INI 
LOcH 

AQA 
ISE 
UJP 
ENI 
UJPiI 

ass 

End 



TEMP 

B2SAVE.2 
0.2 
TEMP 

"012 
1.2 
TEMP, 2 



3,2 

LOOP 

•••2 

CVTBCOB 
1 



SAVE INPUT PAR. 
SAVE (82) 

LOAD A WITH MOST SIGNIFICANT 

CHARACTER. 

MULTIPLY (A) BY «N OCTAL 12 

LOAD Q «ITri N£XT SIGNIFICANT 
CHARACTER. 

IS B? EQUAL Tn 3 YES EXIT 

no jump to loop 
restore b2 



LITERALS 
00016 



NUMBER OF LINES KITH DIAGNOSTICS 



• 



A-45 



CUMPASS-32 


(2 


1) 


CVTSC08 




32SAVE 




P000J3 




P00002 


CVT8CDB 




P00000 




P00014 


LOOP 




P00005 




P00012 


TEMP 




P00015 




P00001 


LITERAL 




P00016 


00000012 


P00005 



\\/?l/t>b PAGE 



POOOO* 



POOOOT 



COMPASS-32 (2tl) 



CVTBBCO 
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ENTRY-POINT SYMBOLS 

CVTBBCO 00000 



LENGTH OF SUBPROGRAM 00033 
LEN6TH OF COMMON 00000 

LENGTH OF DATA 00000 



COMPASS-32 



A- 46 



CVT88CD 

















ENTRY 


CVTB8CD 


00000 


01077777 


01 





77777 





CVTB8C0 


UJP 


• • 


00001 


47100025 


47 





P00025 


1 




STl 


81SAVE.1 


00002 


21000027 


21 





P00027 







LDlJ 


BLANKS 


00003 


41000030 


41 





P00030 







SFq 


SCDANS 


0000* 


41000031 


41 





P00031 







STq 


6C0ANS*1 


00005 


43000113 


43 





P00022 


3 




SUCH 


SETSISN*3 


00006 


03200012 


03 





P00012 


2 




AZjtGE 


BYPASS 


00007 


14100040 


14 





00040 


1 




ENI 


408>1 


00010 


47100022 


47 





P00022 


1 




STl 


SETSISNil 


00011 


16477777 


16 


1 


77777 







XOa»S 


-0 


00012 


14100007 


14 





00007 


1 


arPASS 


ENi 


7tl 


00013 


13077747 


13 





77747 





LOOP 


ShaU 


•24 


00014 


51000032 


51 





P00032 







OVA 


«012 


00015 


43400140 


43 


1 


P00030 


u 




SUCH 


9C0ANS.1 


00016 


02500020 


02 


1 


P00020 


1 




I JO 


•♦2d 


00017 


01000022 


01 





P00022 







UJP 


SETSIGN 


00020 


04400000 


04 


1 


00000 







ase.s 





00021 


01000013 


01 





P00013 







UJP 


LOOP 


00022 


14700060 


14 


1 


00060 


3 


SETSIGN 


ENO 


60B 


00023 


43400140 


43 


1 


P00030 







SflCH 


BCDANS.l 


00024 


25000030 


25 





P00030 







LOAQ 


BCOANS 


00025 


14177777 


14 





77777 


1 


B1SAVE 


ENi 


**t I 


00026 


01400000 


01 


1 


POOOOO 







UJPiI 


CVTB8CD 


00027 


60606060 




BLANKS 


SCO 


li 


00030 












8CDANS 


BSS 
ENO 


2 


LITERALS 


















0032 


OOOOC 


012 















ll/?l/66 PAGE 
THIS SUBPROGRAM CONVERTS A 24 flIT BINARY NUMHEo TO A EIGHT 
CHARACTER BCD NUMBER WITH BLANKS INSERTED TO THE LEFT OF THE 
MOST SIGNIFICANT DIGIT. 

CALL (P) *RTJ CVTBBCO 
(P*1)*«ETURN 
IA) * 24 8IT BINARY NUMBER 

OUTPUT (AQ) a EIGHT CHARACTER BcO NUMBER 



S*VE (81) 

SET OUTPUT AREA TO BLANKS 

SET ASSUMED SIGN TO POSITIVE 

is Input number positive yes jump 

NO SCT SIGN 

COMPLEMENT THE 24 BIT NUMBER 
SET MAX TIMES THROUGH LOOP 
SHIFT FOR 48 BIT DIVIDEND 
OlVlDE BY OCTAL 12 
STORE NEXT SIGNIFICANT DIGIT 



IS THE QUOTIENT ZERO-YES SKIP 



PLACE SIGN JUST TO THE LEFT OF 
MOST SIGNIFICANT DIGIT. 



RESTORE (81) 
EXIT 



NUMBER OF LINES WITH DIAGNOSTICS 



COMPASS-32 


(2.1) 


CVTBBCO 




81 SAVE 


P00025 




P00001 


BCOANS 


P00030 




P00003 
P00024 


BLANKS 


P0002T 




P00002 


BYPASS 


P00012 




P000O6 


CVTBBCO 


POOOOO 




P00026 


LOOP 


P00OJ3 




P0002! 


SETSIGN 


P00022 




►"00005 


LITERAL 


P00032 


00000012 


P00014 



ll/?l/66 PAGE 1 
P00004 P00015 P000Z3 



P00010 
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SEUUENCEi002 
JOB.»n 
COMPASS. L>X 



COMPASS- J2 



EXTERNAL SYMBOLS 
CIO 



]l/?l/^ib HACi£ 



tNTHY-HOtNT SYMBOLS 

IOC 00000 



LENGTH OF SUBPROGRAM 
LENGTH OF COMMON 
LENGTH OF DATA 



00032 
OOOiO 
00000 



COMPASS-32 


(2.1) 




00000 


01077777 


01 


00001 


00777777 


00 


00002 


01000074 


01 


00003 


01000001 


01 


00004 


00000000 


00 


00005 


00000050 


00 


00006 


00700001 


00 


00007 


13000074 


13 


00010 


03200006 


03 


00011 


17700010 


17 


00012 


04700000 


04 


30013 


01000031 


01 


00014 


22000000 


22 


00015 


04600041 


04 


00016 


01000001 


01 


00017 


00700006 


00 


00020 


02000073 


02 


00021 


01000017 


01 


00022 


00000002 


00 


00023 


00000002 


00 


00024 


00700017 


00 


00025 


13000073 


13 


00026 


03200024 


03 


00027 


77700000 


77 


00030 


01000001 


01 


00031 


01400000 


01 



IOC 
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77777 
X77777 

00074 
P00001 
COOOOO 

00050 
X00001 

00074 
P00006 

00010 

00000 
P00031 
COOOOO 

00041 

P00001 

1 X00006 

00073 

P00017 

C00002 

00002 
X0Q017 

00073 
P00024 i 

00000 3 
P00001 
POOOOO 



IOC 
HEAO 



IN8UFF 



ENjUY 

EX T 

UJP 

HTj 

01 

UJP 



RTj 
13 

AZj.GE 

ANQ 

USE 

UJP 

LACM 

ASE 

UJP 

RTj 

02 

UJP 



RTj 
13 

AZj.GE 
SUS 

UJP 
UJP. I 
COMMON 

BSS 
END 



IOC 

CIO 

•• 

CIO 

60 

*-2 

INBUFF 

40 

CIO 

60 

•-2 

10B 



EOF 

INBUFF 

41B 

READ 

CIO 

59 

*-2 

INBUFF+2 

2 

CIO 

59 

*-2 

READ 
IOC 



U/?l/66 PAKE 



IOC 



NUMBER OF LINES WITH DIAGNOSTICS 



'-0AD.56 

SNAP, CuC) 15.CC.C47.0.0P 

S;n,10 
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SUBR 
























155*7 


IOQRAIN 


15611 


IOPACK 


16245 


SNAPSHOT 


17705 


IOC 










ENTR 
























15557 


IOORAIN 


16134 


HEAOINP 


16012 


REAOLUN 


15611 


WRITECTO 


16200 


WRITEACC 


16172 


WRITEPUN 


15621 


WRITELUN 


16163 


•RITEOUT 


16307 


PROGOUMP 


16266 


FORTOUMP 


16245 


SNAPSHOT 


17705 


IOC 


00745 


SEL 


02130 


UST 


02170 


CST 


00060 


CIT 


02241 


RHT 


02201 


AET 


02402 


HOCKSUM 


02305 


HDCKF1 


02015 


BCOBOXS 


02015 


FDPBOXS 


00107 


CIO 


02453 


START2 


02737 


LOAOEK 


02261 


ACCOUNTS 


02303 


MEMORY 


02015 


ABNORMAL 










COHM 
























03206 


03255 
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DP LOC 17722 

OCTAL MEMORY 

03206 00000 60606060 

03216 00010 45657360 

03226 00020 51477344 
GAP 



00000060 



Q 00000000 



Bl 00000 



60605125 
31626321 
30216347 



21436044 
51734547 
60606060 



64734564 
65734473 
60606060 



73432144 
44222151 
00702015 



B2 17705 



22242171 31475131 44257331 
73443021 63734447 73442221 
00702015 00702015 00702015 



OP LOC 17722 
OCTAL MEMORY 

03206 00000 60606060 

SAP 
03226 00020 60606060 

6AP 



A 00000060 



Q 0000O000 



Bl 00000 



60017345 
60606060 



64212273 

606Q6060 



60606060 
60606060 



60606060 
00702015 



60606060 

007fl20l5 



60606060 

00702015 



60606060 
00702015 
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SEQUENCE .003 

JCM,JC.482,1S 

0CC.X16 

OCC. (IDC) 27.01 nnoonOA 

OCC»X,200000?4(IOC) ,4400000 3*, 440000 10<, 00777777 

OCC,*, 02000073, 01 00 0003x.00000n]5x,000n0n01 

OCC»* ,00777777. 130000 73, 0320001 OX, 77 70O0OO 

OCC«*. 01000030(100 ,7760f.0h0 

HUM, 10 



SU8P 
17635 

ENTR 
17635 
02201 
02453 

COMM 



IOC 
AET 
START2 



00745 SEL 
02402 ROCKSUM 
02737 LOADEH 



02130 UST 
02305 HOCKFJ 
0226] ACCOUMTS 



02170 CST 
02015 RCD«0»S 
02303 MPMORr 



OOoftn rTT 
02nlH FOP'OXS 
02015 4BNnRMA| 



n2?41 «HT 
00107 CIO 



EXTA 
17617 
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LOC 000*3 A nnP0?015 Q 


40004003 


H\ 0(1014 


R? 17*35 


B3 OOOOO 1C ni If, 14 17*45 


AGISTER FILF 
















00 


00077460 


20413534 


00770077 


00770077 


00770077 


10770077 


00770077 


O077ofl77 


10 


04077574 


2601353* 


00770077 


00770077 


0U770077 


00770077 


00770077 


00770077 


20 


6(1**5*00 


ooo*5?54 


2657U02 


00007725 


*7o3o634 


10002O15 


40004003 


00000014 


30 


7in*s*on 


72045*04 


23575770 


00007725 


007'0077 


10017*35 


oooooooo 


00030007 


40 


000062*3 


inoo?*03 


00077776 


(10^03320 


IH)n002*T 


•10000000 


00H73O2 


OOOOOOOO 


SiJ 


01007331 


10003?74 


uooooooo 


nOnOnOOO 


n o o u o o * ? 


■•>n00'T)O5 


8 


,VJQO?0 37 


60 


ooooooo* 


0000070 


O00O00QU 


60*06060 


ounuOOO* 


1000"*271 


n o o o * 1 7 1 


O0000013 


10 


0000O00? 


i4n77776 


00000003 


OOOOOOSO 


000001** 


10000013 


60*060*0 


nOUOoOOO 


ME-iOHY 


















03->00 


606060M 


60606060 


60606060 


60*0*060 


6060606O 


*060*0*0 


O0'o2015 


o070?0l5 


liAt' 
1?M0 
1 7h2i 


00702O1 S 


OO/OZDI 5 


0070201b 


107o?015 


00702015 


1070'015 


no7o2o:5 


70017661 


4401 762? 


4*017627 


00777777 


■12000073 


Hll7622 


10017634 


OOOOOOOl 


00777777 


I 7*30 


13000073 


13217627 


T7700000 


or>1766S 


77*06060 


H002037 


00700117 


01000074 



17'.*0 01nl7*3* 

1 7*>h>0 0101766^ 

17660 0000000? 

17670 20102001 



GAP 
17730 



10O17667 (J0O00050 

22077334 »4ft00041 

00700107 13O00073 

11002001 44102020 



oooooooo nooooooo oonooooo 



1070010? l3nU007* 

01017636 00700107 

03217661 01017617 

11122100 11121004 



OOOOOOOO oooooooo 



'3217643 17700010 O4700000 

•12000073 01017654 00017671 

'H017636 01*17635 o005*010 

10000000 OOOOOOOO OOOOOOOO 

10000000 OOOOOOOO 00702015 



SEu FHH 
SEo t»» 



SEQUENCE* 00* 



ADDITIONAL EXERCISES (Assignment Sheets) 



3200 Computer Characteristics 

Load Instructions 

Store Instructions 

Arithmetic, Fixed Point 

Register Operations Without Storage Reference 

Stop and Jump Instructions 

Inter-Register Transfer 

Search and Move Operations 

Storage Tests 

BCD Operations 



Bl - B2 

B3 

B4 

B5 - B6 

B7 - B8 

B9 - Bll 

B12 - B13 

B14 - B17 

B18 - B19 

B20 - B22 



Appendix 



J3 
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3200 COMPUTE.^ CHARACTERISTICS 

1. For each of the following word addresses and character positions, 
provide the equivalent character address and the storage- module in 
which it is contained. 

Word Address Character Position Character Address Storage Module 

a) 00027 #0 

b) 06313 #1 

c) 15346 #2 

d) 20476 #3 

2. For each of the following character addresses provide the equivalent 
-word address, character position and storage module. 

Character Address Word Address Character Position Storage Module 

a) 300630 

b) 152063 

c) 325076 

d) 150762 

3. If Character Address 340556 were specified, what character address 
would actually be referenced in an 8K system? 



4. If Character Address 160560 were specified, what character address 
would actually be referenced in a 16K system? 



5. The 3200 system can consist of a maximum of 12-bit data 



caaimeis . 
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6. A 24-bit data channel may be used in place of 12-bit data 

channel(s). It will be programmed as channel number . 

7. A 3200 data channel may control a maximum of peripheral 

equipment controllers. 

8. Give a brief description of the four (4) types of Processors. 



9. What memory locations are always permanently protected and why? 



10. What address or block of addresses are protected by the Storage 
Protect Switches below? 

Ill 111 110 NNN NNN = 



11. Describe what happens when an instruction attempts to write into a 
Protected address? 



12. Give the function of each location within the register file. 



LOAD INSTRUCTIONS 
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GIVEN: (A) = 00000000 
(Q) = 00007777 



(B 1 ) .= 2 
(B 2 ) - 2 
(B 3 ) = 



TEMP 
TEMP 



Memory Location 13314 



) 


1 27 


m 


33 1 


17 








+1 


i 40 


jn 


33 


15 








+2 


i 20 


41 | 


33 


14 ! 








+3 


| 23 


33 


26 


15 








+4 


| 00 


7i i 


33 J 


16 | 



What are the contents of the indicated registers after the execution 
of each instruction? Assume initial condition above for each problem. 



1. 


LDA 


2. 


LDQ 


3. 


LACH 


4. 


LDA, I 


5. 


LDL 


6. 


LCAQ 


7. 


20113315 


8. 


22055462 


9. 


54113316 


10. 


LDI,I 


11. 


LQCH 


12. 


LACH 



TEMP 
TEMP+1 
TEMP,1 
TEMP, 2 
TEMP, 2 
TEMP+1 



TEMP+4,1 

TEMP+7 

TEMP+2,1 



(A) = 

(Q) = 

(A) = 

(A) = 

(A) = 

(A) = 

(Q) = 

(A) = 

(A) = 

(B 1 ) = 

(B 1 ) = 

(Q) = 

(A) = 



B-4 



STORE INSTRUCTIONS 



GIVEN: (A) = 24130120 
(Q) = 13000003 



(B 1 ) 



(B ) = 10 
(B 3 ) = 1 



TEMP = Memory Location 33444 
TEMPI = Memory Location 33446 

TEMP 
TEMPI 



1 01 | 


33 


34 


43 | 








1 77 | 


53 


34 


44 | 








1 66 1 


73 


34 


45 | 








1 65 1 


03 


34 


46 | 








1 44 1 


55 


66 


77 | 



What are the contents of the indicated registers or memory locations 
after the execution of each instruction? (Assume original settings 
at beginning of each instruction set.) 



1. 


STA 


2. 


STQ,I 


3. 


SACH 


4. 


SWA 


5. 


STAQ,I 


6. 


SCHA 


7. 


STI 


8. 


SQCH 


9. 


STI 


0. 


SWA, I 



TEMP+4 


(A) = 


TEMP 


(TEMP) = 


TEMP, 2 


(TEMP+2) = 


TEMP+3 


(TEMP+3) = 


TEMP 


Where are A & Q stored 


TEMP+1 


(TEMP+1) = 


TEMP+4 


(TEMP+4) = 


TEMPI , 1 


(Modified location) = 


TEMPI, 3 


(TEMPI) = 


TEMP1+1 


(TEMPI) = 
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ARITHMETIC, FIXED POINT 

The following problem set is to familiarize the student with the 
arithmetic instructions. 

1. MC, set P to ''GO 1 ' and start. 



;o ena,s 


60 4B 


ENQ 


77777B 


MUA 


INTEGER 


HLT 


GO 


INTEGER HLT 


4 



(A) f - 



2. MC, set P to "GO" and start, 



GO 



DIVISOR 



ENA,S 

ENQ,S 

DVA 

HLT 

OCT 

(A) f = 

(Q)f = 



o 

600B 

DIVISOR 

GO 

-7 



3. MC, set P to "GO" and start, 



GO 



NUMB 



LDA 


NUMB 


ADA 


NUMB+1 


ANA 


77777B 


RAD 


NUMB+2 


HLT 




OCT 


-10,-2000,1 



(A), 



4. MC, set P to "GO 11 and start, 



GO 



MINUS 



EN I 


7,1 


ENA,S 


6 


INA,S 


1 


SBA 


MINUS 


HLT 




OCT 


10 


m. = 
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5. What are the contents of A register when program halts? 



TEMP 

(A) = 



ENI 


-6,1 


LDA 


TEMP 


SHA 

PT T 


5,1 


tlLiL 

OCT 


40123400 
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REGISTER OPERATIONS WITHOUT STORAGE REFERENCE 

For each of the following short routines, indicate the final contents 
of designated register. Assume that a M.C. was performed prior to 
starting each program. 



1. 



2. 



3. 



M.L. 

00000 
00001 
00002 
00003 
00004 



00000 
00001 
00002 
00003 
00004 



00000 
00001 
00002 
00003 
00004 



00000 
00001 
00002 
00003 
00004 
00005 
00006 



(B 1 ), 



(A) f = 



(Q)< 



CONTENTS 


ENI 


40000B,1 


INI 


100B,1 


XOI 


7677B,1 


ANI 


7777B,1 


HLT 





ENA,S 


40000B 


X0A,S 


40000B 


INA,S 


50000B 


ANA,S 


40000B 


HLT 





ENQ 


60000B 


XOQ 


70000B 


INQ 


77777B 


ANQ 


77777B 


HLT 





ECHA 


2003B 


ENQ 





SHA 


-2 


SHAQ 


24 


SHQ 


1 


SHAQ 


35430B 


HLT 





(A). 



(Q) f = 
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GIVEN: (A) = 40372156 (B 1 ) - 77777 

(Q) = 35642761 (B 2 ) = 41745 

(B 3 ) = 72156 

Regarding each of the following instructions as separate problems, indicate 
which will RNI at P + 1 by placing a check (i^") in the space provided. 



1. 


ISE 


0,1 


2. 


ISE 


41745B,3 


3. 


ISE 


43745B,2 


4. 


ASE,S 


27614B 


5. 


ASE 


72156B 


6. 


QSE 


47321B 


7. 


QSE,S 


34763B 


8. 


ISE 


72156B,3 


9. 


ISE 


0,0 


10. 


ASE,S 


72156B 


11. 


ISG 


77777B,1 


12. 


1SG 


27317B 2 


13. 


ISG 


77345B,3 


14. 


ASG,S 


73452B 


15. 


QSG,S 


04210B 


16. 


ASG 


72156B 


17. 


QSG 


35016B 


18. 


ISG 


72156B,3 


19. 


ISG 


17774B,0 


20. 


ISG 


37432B,2 
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STOP AND JUMP INSTRUCTIONS 



GIVEN: (A) = 40372156 (B 1 ) = 77777 

(Q) = 35642761 (B 2 ) = 41745 

(B 3 ) = 72156 



Regarding each of the follov-'ng instructions as separate problems, 
indicate which will RNI at P + 1 by placing a check dy) in the space 
provided. 



1. 


ISI 




0,1 


2. 


ISI 




30632B,2 


3. 


ISI 


72156B,3 


4. 


ISD 


W y \J 


5. 


ISD 


77777B,1 


6. 


ISD 




47445B,2 


7. 


ISD 




05621B,3 


8. 


ISD 




41745B,2 


9. 


ISI 




37621B,1 


10. 


1J1 




0,0 


11. 


IJD 


62156B,3 


12. 


IJI 




44444B,3 


13. 


IJI 




77777B,3 


14. 


IJD 




67565B,0 


15. 


AZJ, 


,EQ 


73125B 


16. 


AZJ, 


,NE 


33127B 


17. 


AZJ 3 


,GE 


27215B 


18. 


AZJ, 


,LT 


77777B 


19. 


AQJ, 


,EQ 


41425B 


20. 


AQJ, 


,GE 


42761B 
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1. MC, set P to 06CT00 and start. 



M.L. 



06000 
06001 
06002 
06003 
06004 
06005 
06006 





CONTENTS 




LDA 


6004B 




INA,S 


-1 




AZJ,NE 


6005B 




HLT 






00 







INA,S 


2 




UJP 


6001B 


(A) f 







2. MC, set P to 05120 and start. 



M.L. 

05120 
05121 
05122 
05123 
05124 
05125 
05126 
05127 



CONTENTS 




ENI 


77B,1 


INA,S 


10000B 


1JD 


5121B,1 


1NQ,S 


10000B 


1SI 


77B,1 


UJP 


5123B 


ANA 





HLT 





(A) j 

(Q) j 

(B 1 ), 



3. MC, set P to 07000 and start. 



M.L. 

07000 
07001 
07002 
07003 
07004 
07005 
07006 
07007 





CONTENTS 




IJ1 




7007B,1 


UJP 




7006B,3 


UJP 




7004B 


1JI 




7002B,2 


UJP 




7005B,1 


UJP 




7002B 


RTJ 




7002B 


HLT 







(P) c = 



(07002) 
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4. What does this program do? 





ENI 


4,1 


AGAIN 


LDA 


TEMP,1 




RTJ 


ROUTINE 




UJP 


*+4 




*RAD 


TALLY 




IJD 


AGAIN , 1 




HLT 


** 




RAD 


COUNT 




UJP 


*-3 


ROUTINE 


UJP 






ENI 


0,2 




ASG 


100B 




INI 


1,2 




EN A 


1 




UJP, I 


ROUTINE 


TEMP 


OCT 


100 




OCT 


21 




OCT 


77 




OCT 


101 




OCT 


10 


TALLY 


OCT 





COUNT 


OCT 






-The RAD instruction must have been discussed before the above 
problem can be done. 

MC, set P to "CO 1 ' and start. The selective stop switch and jump 
switches 1 and 6 are set. 



M.L. 




CONTENTS 


CO 




UJP 


C.6 


C.l 




HLT 


CO 


C.2 




SJ1 
SLS 


C.l 


C.4 




SJ3 


CIO 






SJ6 


C.2 


C.6 




SJ2 


CIO 






UJP 


C.4 


CIO 




SLS 






(p) £ = 







If the machine were restarted from where it stopped, what memory 
location would it go to? 



B-12 



INTER-REGISTER TRANSFER 



1. 



What are the contents of the A register and Q register when program 
is executed? 



M.L. 



00000 




LDQ 


TEMP 


00001 




ENA 


GET 


00002 




SWA 


*+l 


00003 




LDA 


** 


00004 




AQA 




00005 




STA 


*+2 


00006 




ENQ 


-6 


00007 




HLT 


** 


00010 




HLT 


** 


00011 


GET 


ENI 


0,0 


00012 


TEMP 


OCT 
(A) = 

(Q) = 


02677771 



2. MC, set P to GO and start, 



GO 


ENA 


10 




TAI 


3 




ENQ 


10 




INI 


-1,3 




HLT 





(A) f = 

(0). = 
t 

(B 3 ) = 



3. Write the octal coding that will be generated by the following 
COMPASS coding. 





COMPASS 




1) 


AQA 




2) 


INA 


3 


3) 


TIA 


2 


4) 


TQM 


22B 


5) 


AIA 


1 


6) 


TIM 


20B,2 


7) 


TAM 


77B 


8) 


TMI 


60B,3 


9) 


TMA 


27B 


10) 


TMQ 


55B 


11) 


TAI 


I 



OCTAL 



4. MC, set P to BEGIN and start. 
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BEGIN 



AIA 



ENI 


-100B,1 


EN I 


-200B,2 


ENI 


300B,3 


ENQ,S 


-0 


TQM 


24B 


TIA 


1 


SHAQ 


-24 


TIA 


3 


AQA 




TAM 


25B 


AIA 


2 


TAM 


26B 


ENA,S 


-1 


IAI 


1 


TIM 


27B,2 


TMQ 


24B 


ENA 





AQA 




HLT 





(A) f = 

(Q) f = 

(B L ) f = 

(V24) = 

(V25) = 

(V26) = 

(V27) = 



MC, set P to BEGIN and start. 



BEGIN 


LDAQ 


NUMB 




MUAQ 


INTEGER 




DVAQ 


DIVISOR 




STAQ 


ANSWER 




ELQ 






EUA 






STAQ 


ANSWER+2 




HLT 




NUMB 


OCT 


-0,-100 


INTEGER 


OCT 


0,4 


DIVISOR 


OCT 


0,2 


ANSWER 


OCT 


0,0,0,0 




(ANSWER) 


= 




(ANSWER+1) 


= 




(ANSWER+2) 


= 




(ANSWER+3) 


= 



1. 



START 
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SEARCH AND MOVE OPERATIONS 



I DENT 


MAIN 


ENTRY 


START 


EXT 


DELBLANK 



ENA 
RTJ 



DATACARD 
DELBLANK 



DATACARD 


BSS 


20 




END 


START 




I DENT 


DELETE 




ENTRY 


DELBLANK 


BELBLANK 


UJP 


** 




STI 


SAVEB2,2 




EN I 


0,2 




SHA 


2 




SCHA 


FCA 




SCHA 


SRC+1 




INA,S 


80 




SCHA 


SRC 


SRC 


SRCN 


60B,**,** 




UJP 


*_2 




PAUS 


4000B 




UJP 


*-l 




TMA 


30B 




LPA 


MASK 




SHAQ 


24 




TMA 


20B 




LPA 


MASK 




AQJ,EQ 


EXIT 




SCHA 


*+3 


INCRE 


INA,S 


1 




SCHA 


SCR+1 




LACH 


** 


FCA 


SACH 


**,2 




INI 


1,2 




UJP 


SRC 


EXIT 


LDA 


*-3 




LPA 


MASK 




AIA 


2 


SAVEB2 


EN I 


** 2 




UJP, I 


DELBLANK 


MASK 


OCT 
END 
FINIS 


00377777 
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Assume program MAIN had previously read in one card image into the 
area labeled DATACARD before it transfers control to a commonly 
used subprogram called DELETE. 

A. Why is Index Register No. 2 saved upon entrance to the DELETE 
subroutine? 



a , 



XTXI A A T-. o +- -v-i i ^ <- - 



Why does the program MAIN execute an i_,I\nn ixn 

it does a return jump to the DELETE subroutine? 



C. What is the significance of the double asterisk (**) in the 
coding of the SRCN instruction in the DELETE subroutine? 



D. What is the function of the unconditional jump instruction which 
follows the SRCN instruction in the DELETE subroutine? 



E. What two conditions will cause the PAUS instruction within the 
DELETE ROUTINE to do a SKIP EXIT (P + 2)1 
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F. Why at location INCRE is the character address in A updated 
by 1? 



G. What does the A register contain when control is transferred 
back to program MAIN? 



2. 





ENTRY 


PR0G1 


PR0G1 


EN I 


0,1 




EN I 


0,2 


MOVE 


LACH 


FILE1,1 




SACH 


FILE2,2 




INI 


1,2 




ISI 


7,1 




UJP 


MOVE 



PR0G2 



END 



PR0G1 



ENTRY 


PROG 2 


MOVE 


10B,FILE1,FILE2 


UJP 


+-2 


PAUS 


4000B 


UJP 


*-l 


HLT 




END 


PROG 2 



Given the above routines, which one will accomplish the move faster? 
Assume both routines do a character by character move. 



Does the MOVE instruction buy the programmer much time if he has to 
wait until the MOVE is completed? 
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3. Write a short program which will search a character block (character 
addresses CARD to CARD+80) for the first COMMAS,). Loop until the 
search is complete and determine if a COMMA( , ) was found; if one 
were found, load the ADDRESS into the A register; if not, set A = 0. 
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1. 



STORAGE TESTS 



SEARCH 


ENTRY 
EN I 


SEARCH 
0,2 




EN I 


7,1 




ENA 


200 




ENQ 
CPR 
UJP 
UJP 


100 

LIST,1 

*+3 

*+2 




RTJ 
IJD 


FIND 
*-4,l 


FIND 


HLT 
UJP 






ENA 
AIA 


LIST 
1 




STA 
INI 


ADDRESS, 2 
1,2 


LIST 
ADDRESS 


UJP, I 
DEC 
OCT 
END 


FIND 

1,150,20,300,5,200,100,77 
0,0,0,0,0,0,0,0 



What does the above program do? 



When the program comes to a HALT, what do the following location: 
contain? 

ADDRESS 

ADDRESS+1 = 

ADDRESS+2 = 

ADDRESS+3 = 



2. The number in the A register aft 



er executing a SSH instruction is? 



a) Zero 

b) The original number from memory, unshifted. 

c) The original number from memory, shifted. 



d) 



Thp 
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3. 





ENTRY 


SCAN 




SCAN 


EN I 


0,3 






EN I 


0,2 






EN I 


3,1 






LDQ 


MASK 




CONTINUE 


LDA 


DATA 






MEQ 


LIST,L 






UJP 


CHECK 






ENA 


LIST 






AIA 


1 






SHA 


2 




GHARADDR 


AIA 


2 






STA 


LIST1,3 






INI 


1,3 






UJP 


CONTINUE 




CHECK 


SSH 
HLT 


CONTROL 






SHQ 


18 






SHA 


18 






STAQ 


MASK 






INI 


1,2 






UJP 


SCAN+2 




CONTROL 


OCT 


73567356 




MASK 


OCT 


77000000 




DATA 


OCT 


45000000 




LIST 


BSS 


3 




LIST1 


OCT 
END 


0,0,0,0,0,0,0,0,0. 


,0,0,0 



What does the above program do' 



4. Write a program which will search a table called INFO, looking for 

the value 62 in bit positions 11 - 06. Search every other location 

o 

in INFO, which is a total of 16, locations long, starting with the 
last location within the INFO table. The program must keep track of 
all addresses, where a find had occurred. 
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BCD OPERATIONS 

1. The decimal quantity +32,768,987 is contained in a field beginning at 

character address 010000. Indicate the octal contents of the appropriate 
memory locations. 

MEMORY LOCATIONS CONTENTS 



2. After executing a SET 12 and a LDE AA+2 instruction, indicate the 
sign and contents of the E register. AA - 65136 

CONTENTS 

AA 11071002 

02050711 

(E) f - 06010210 

11117102 

3. After executing a SET 10 and a ADE BB+2 instruction, indicate the 
final sign and contents of the E register. BB = 13417 

CONTENTS 

(E). ■--. -0,000,987,654,321 BB 04060701 

10010010 
(-E)f - 11100000 

4. After executing a SET 4 and a SBE CC+2 instruction, indicate the 
final sign and contents of the E register. CC = 40000 

CONTENTS 

(E^ = +0,000,000,000,989 CC 01141011 

02650411 
(E) f = 



5. After executing a SET 13 and a ADE DD+1,3 instruction, indicate the 

final sign and contents of the E register. (B3) = 77765 DD - 04002 

CONTENTS 

(E) i = +1,000,000,000,000. 01100611 

11070302 
( £ )f = 10100301 

DD 00111151 
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6. After executing a SET 9 and a STE 10B instruction, indicate the final 
sign and contents of the E register as well as the contents of the 
storage locations affected. 



(E). 



-9,568,765,867,1 



M.L, 



CONTENTS 



7. Fill in the six (6) locations starting with "CHARS" with their octal 
contents, after the following has been executed. Place X^s where 
contents not known. 



(E ) = H^)000045468799 





EZJ,EQ 


OUT 




EZJ,LT 


OUT 




SET 


10 




SFE 


2 




STE 


ANSWER 




NOP 




OUT 


HLT 




CHARS 


BCD,C 


12, TOTAL EQUAL 


ANSWER 


BCD,C 


10, 



CHARS 



(E) f = 



(D) = 
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Fill in the octal contents of the four (4) locations starting at 
"DATA", after the following program has been executed. Place X's 
where the contents are not known. 



E D = - 


0405060708090 








SET 


1 




EN I 


0,2 


LOOP 


EZJ,EQ 


DONE 




SFE 


-1 




STE 


DATA, 2 




INI 


1,2 




UJP 


LOOP 


DONE 


HLT 




DATA 
DATA 




BCD, 


C 


1 


2, 


(E) £ = 
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3200 COMPUTER CHARACTERISTICS - ANSWERS 



Character Address 

a) 000134 8 

b) 03L455g 

c) 065632 8 

d) 102373g 



Storage Module 



1 



Word Address 

a) 60146g 

b) 32414 Q 

o 

C; OJZ.1/Q 

d) 32174 g 

Character Address 
040556 o 



Character Position Storage Module 
3 



Word Address 



Character Position 



Character Address 



160560 



Word Address 



34134, 



Character Position 



a) 2 

b) #2 



a) 3204 (Basic Processor) contains the logic to perform 24-bit fixed 
point arithmetic, 48-bit fixed point addition and subtraction, 
Boolean, character and word handling and decision making operations. 

b) 3205 (Scientific Processor) contains the capability of the 3204, 
plus floating point and 48-bit precision fixed point multiplication 
and division. 
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c) 3210 (Data Processor) contains the capability of the 3204, plus 
the ability to handle BCD characters. 

d) 3215 (General Processor) contains the capability of the 3204, 
3205 and 3210. 

9. Memory Size Locations Protected 

4K 07640 - 07677 

8K 17640 - 17677 

16K 37640 - 37677 

32K 77640 - 77677 

The auto-load program resides here, and consists of the necessary 
instructions to bring in a program from magnetic tape unit. If these 
locations were not protected, this program could be destroyed and no 
more auto-load capability, which is a necessary item for the 3200 
Scope operating system. 

10. LOCATIONS 77600g thru 77677g 

11. No writing takes place and the write instruction acts like a NOP 
instruction. The computer does not HALT and does not generate an 
interrupt. The illegal write can be only sensed by the INS instruction, 

12. Register Numbers Reserved for: 

00 - 07 Modified I/O instruction word containing the 

current character or word address (channel 
0-7 control) 

10 - 17 Modified I/O instruction word containing the 

last character or word address + 1, depending 
on the instruction (channel 0-7 control) 

20 Search instruction word containing the current 

character address (search control) 

21 Move instruction word containing the source 

address (move control) 
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cont . ) 






Regi 


ster Numbers 




22 






23 






24 


- 27 




30 





Reserved for: 

Real-time clock, current time 

Current character address (typewriter control) 

Temporary storage 

Instruction word containing the last character 
address +1 (search control) 

31 Instruction word containing the destination 

address (move control) 

32 Real-time clock, interrupt mask 

33 Last character address + 1 (typewriter control) 

34 _ 77 Temporary storage 
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1. 27313317 

2. 40513315 

3. 00000033 

4. 23142615 

5. 00003314 

6. 37264462 
57364463 

7. 23142615 

8. 00000033 

9. 13314 

10. 42615 

11. 00000015 

12. 00000040 



LOAD INSTRUCTIONS - ANSWERS 
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STORE INSTRUCTIONS - ANSWERS 



1. 24130120 

2. 01333443 

3. 20733445 

4. 65030120 

5. (TEMP) = A 
(TEMP+1 ) = Q 

6. 77530120 

7 . 44500000 

8. (TEMP+1) = 77533403 

9. 66700001 
10. 66730120 
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ARITHMETIC, FIXED POINT - ANSWERS 

1. (A) f = 00003020 

(Q) f = 00000000 (can't be a negative zero) 

2. (A) f = 77777711 (-66 ) 

(Q)f = 00000006 Same Sign as Dividend 



3. (A) f = 00075767 



4. (A), = 77777776 



5. (A) f = 60051600 
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REGISTER OPERATIONS WITHOUT STORAGE REFERENCE - ANSWERS 



1. (B 1 ) f = 07777 

2. (A) £ = 77740000 

3. (Q) f = 00007777 

4. (A) f = 00001000 
(Q) f = 00000000 



1. 


]/ 


2. 


\S 


3. 


\X 


4. 


\S 


5. 




6. 


1/ 


7. 


1/ 


8. 




9. 




10. 


\/ 


11. 




12. 




13. 


\S 


14. 


\S 


15. 




16. 




17. 




18. 




19. 


1/ 


20. 
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1. 


]^ 


2. 


S 


3. 




4. 




5. 




6. 


S 


7. 


S 


8. 




9. 


s 


10. 


s 


11. 




12. 




13. 




14. 


s 


15. 


IS 


16. 




17. 


s 


18. 




19. 


s 


20. 


s 



STOP AND JUMP INSTRUCTIONS - ANSWERS 



1. (A) f = 00000000 

2. (A) f = 00000000 
(Q) f = 01000000 
(B ) = 00000 

3. (P) f = 07007 
(07002) = UJP 07007B 

4. Looks at all values of TEMP TEMP+4, 
for values greater or equal to 100 
octal. A count of all values equal 

to or greater than 100 octal are 
kept in COUNT. A count of all values 
less than a 100 octal are kept in 
TALLY. 



5. (P) = C.l 
CO 



C-9 



3. 



[NTER-REGISTEH TRANSFERS - ANSWERS 



1. (A) = 16600000 
(Q) = 00077771 

2. (A) = 00000012 
(Q) = 00000012 



(B 3 ), 


= 00011 


1) 


53040000 




53740000 


3) 


53200000 


/, ^ 


^•3Ai nn99 


5) 


53140000 


6) 


53630020 


7) 


53420077 


8) 


53330060 


9) 


53020027 


10) 


53010055 


11) 


53500000 



4. (A) f = 00000000 
(Q) £ = 77777777 
(B 1 ) f = 77676 
(V24) = 77777777 
(V25) = 00100177 
(V26) = 00177776 
(V27) - 00077577 



5. 77777777 
77777577 
00000000 
00000000 
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SEARCH AND MOVE OPERATIONS - ANSWERS 

1. A) All subroutines which are used by other programs, should save any 
register that is uses in performing its task. Index Register #2 
may contain valuable data to program MAIN, at the time it transfers 
control to the DELETE subroutine; so if (B 2 ) was not saved upon 
entrance and restored before exiting from the DELETE subroutine, 
it would contain invalid data upon return to program MAIN. 

B) The DELETE subroutine must have the first word address of the card 
image area in the A Register upon entrance to its routine. So 
program MAIN must obtain the first word address of the card image 
area into A, before it transfers control to the DELETE subroutine. 
It does this by an ENA DATACARD. 

C) Normally a field represented by a double asterisk(**) will be 
modified during the execution of a program and the double asterisk 
(**) provides a convenient way to see if the modification took 
place. (**) presets the field to all l„»s. 

D) Control is transferred to this instruction if a SRCE, SRCN, or 
MOVE instruction is already in progress and the search instruction 
preceding this jump instruction will not be initiated until any 
previous search or move is completed. 

E) 1. When a comparison occurs between the search character (non- 

blank) and a non-blank character in storage. 
2. When register file 20 is equal to register file 30 (no non- 
blank character found). 

F) The search is to continue until all blank characters are deleted. 
Upon a find, the search is terminated and register file location 
#20 contains the address of the find . So to continue the search 

L-Piis a^oress must ue upuated uy 1 or Lhe program will be hung in 
a loop. 
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G) Upon exiting from the DELETE subroutine, A will contain the last 

character address + 1 of the DATACARD area with all blank characters 
deleted. 



2. A) PR0G1 
1.8 
1.8 
3.5 

3.5 Repeated 8 times 
1.8 
2.6 
1.8 
1.8 
109.2 usee. 



PROG 2 
90.2 
1.8 
92.0 usee, 



On the above move he saves only 17.2 usee, (approximately 2 usee, 
per character). On a maximum move of 128 characters, the MOVE 
instruction would be approximately 256 usee. 





I DENT 


PROGRAM 




ENTRY 


START 


START 


SRCE 


73B,CARD,CARD+80 




UJP 


*_2 




PAUS 


4000B 




UJP 


*-l 




TMA 


30B 




LPA 


MASK 




SHAQ 


24 




TMA 


20B 




LPA 


MASK 




AQ J , EQ 


EXIT 




HLT 




EXIT 


ENA,S 


+0 




UJP 


jl. n 


MASK 


0CT 


377777 




END 





STORAGE TESTS - ANSWERS 
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1. 



A) The program searches a list of operands from LIST thru LIST+7 
(10 locations) looking for values that are within or equal to 
the upper limit in A (200 1Q ) and the lower limit in Q (100, ). 
On a find, the addresses of the operands are stored in a table 
called ADDRESS. 

B) M.L. Contents of 



ADDRESS 
ADDRESS+1 
ADDRESS+2 
ADDRESS+3 



LIST+6 
LIST+5 
LIST+1 




2. Answer is d; contents of A is not altered. 

3. The program searches a list of 6 bit characters, from LIST thru LIST+2 
(3 locations) for a 45 code in any character position (0 thru 3) of 
each location. Upon a find, the character address is generated and 
stored into a table called LIST1. 



4. IDENT 

ENTRY 

START EN I 

EN I 

ENQ 

SEARCH ENA 

MEQ 

UJP 

ENA 

AIA 

STA 

INI 

UJP 

THRU HLT 

INF0 BSS 

LIST 0CT 



.1 



PR0GRAM 

START 

17,1 

0,2 

7700B 

6200B 

INF0,2 

THRU 

INF0 

1 

LIST, 2 

1,2 

SEARCH 

16 
0,0,0,0,0,0,0,0 



B = SIZE 0F TABLE (16) + INTERVAL- 1 
B Z = ADDRESS C0UNTER 
Q = 00007700 (MASK) 



INFjZf = START 0F TABLE, 2 = INTERVAL 

SEARCH COMPLETE 

(A) = OOOINF0 

(A) = OOOINF0+B 1 

SAVE FIND ADDRESS 

PREPARE F0R NEXT FIND 



Index register 1 must start with 17 , because it will be decremented 

by the interval (2) before the search begins. This will start the search 

at INF0+15, which is the last location of the table. 
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BCD OPERATIONS - ANSWERS 



1. 02000 03020706 
02001 10111007 

2. (E) f = +0822579612899 

3. (E) f = +0006193435479 

4. (E) f = +0000000009914 

5. (E) f = +0026711689001 

6. 00010 = 07060510 

00011 = 06071011 

00012 = 50XXXXXX 
(E) f = -0000000009568 



7. CHARS T T A 

L E Q 

UAL 

04 05 04 

06 10 07 11 

11 00 00 XX 

(E) f = +0000000000000 

(D) = 10 or 12 
10 B 



DATA 51 50 47 46 
45 44 XX XX 
XX XX XX XX 
XX XX XX XX 

(E) f = +0000000000000 

automatically changes to a +0 



SUMMARY OF INSTRUCTION EXECUTION TIMES, /^sec. 





2.5 ADA 


2.5 LDI 




3.8 ADAQ 


2.5 LDL 




11.5* ADE 


2.5 LDQ 




1.3* AEU 


2.5 LPA 




1.3 AIA 


2.5 LQCH 




1.3 ANA 






1.3 ANI 


4.2 + 4.2n MEQ 




1.3 ANQ 


3.3 MOVE 




1 .3 AQA 


4.2 + 4.2n MTH 




1.3* AQE 


7.8-11.0 MUA 




1.9 AQJ 


16.0-21.0* MUAQ 




1.9 ASE 






1.9 ASG 


3.3 OTAC 




1.9 AZJ 


3.3 OTAW 
. 3.3 OUTC 




1.3-1.7 CINS 


3.3 OUTW 




*** CON 






1.3-1.7 COPY 


2.0 us-40 ms PAUS 




2.5-3.4 CPR 






1.3 CTI 


1.3* QEL 




1 .3 CTO 


1.9 QSE 
1.9 QSG 




1.3 DINT 






11.25 DVA 


3.8 RAD 




22.5* DVAQ 


2.5 RTJ 




1.3* EAQ 


2.5 SACH 




1.3 ECHA 


2.5 SBA 




1.3 EINT 


3.8 SBAQ 




1.3* ELQ 


1.3 SBCD 




1.3 ENA 


11.5* SBE 




1.3 ENI 


2.5 SCA 




1.3 ENQ 


1.9-3.9 SCAQ 




1.3* EOJ 


2.5 SCHA 




1.3* EUA 


1.3 SCIM 




1.3-1.7 EXS 


*** SEL 




1.3* EZJ 


1.3* SET 
1.3-4.3* SFE 




10.0-12.0* FAD 


1.3 SFPF 




20.0* FDV 


1.3-2.7 SHA 




14.0-18.0" FMU 


1.3-2.7 SHAQ 




10.0-12.0* FSB 


1.3-2.7 SHQ 
1.3 SJ1-6 




— HLT 


1.3 SLS 
2.5 SQCH 




1.3 IAI 


3.3 SRCE 




** IAPR 


3.3 SRCN 




1.9 UD 


2.5 SSA 




1.9 IJI 


3.8 SSH 




1.3 INA 


1.3 SSIM 




*** INAC 


2.5 STA 




*** INAW 


3.8 STAQ 




1.3 INCL 


8.0* STE 




1.3 INI 


2.5 STI 




3.3 INPC 


2.5 STQ 




3.3 INPW 


2.5 SWA 




1.3 INQ 


1.3 TAI 




1.3-1.7 INS 


1.8 TAM 




1.3-1.7 INTS 


1.3 TIA 




1.3 IOCL 


1.8 TIM 




1.9 ISD 


1.8 TMA 




1.9 ISE 


1.8 TMI 




1.9 ISG 


1.8 TMQ 




1.9 ISI 


1.8 TQM 




2.5 LACH 


— UCS 




2.5 LCA 


1.3 UJP 




3.8 LCAQ 






2.5 LDA 


1.3 XOA 




3.8 LDAQ 


1.3 XOI 


8.0* LDE 
1 


1.3 XOQ 



n = number of words searched. 

* = Trapped instruction in computers without the appropriate optional hardware package. 

= Dependent upon interrupt response. 
" = Dependent upon a variable signal response time from an external source of equipment. 



INSTRUCTION INDEX 



BY OCTAL OPERATION CODE 



OCTAL 

OPERATION 

CODE 



00.0 

00.1 

00.2 

00.3 

00.4 

00.5 

00.6 

00.7 

01 

02.0 

02.1-3 

02.4 

02.5-7 

03.0 

03.1 

03.2 

03.3 

03.4 

03.5 

03.6 

03.7 

04.0 

04.1-3 

04.4 

04.5 

04.6 

04.7 

05.0 

05.1-3 

05.4 

05.5 

05 .u 

05.7 

06.0-7 

07.0-7 

10.0 

10.1-3 

10.4 

10.5-7 

11.0 

11.4 

12.0-3 

12.4-7 

13.0-3 

13.4-7 

14.0 

14.1-3 

14.4 

14.5 

14.6 

14.7 

15.0 

15.1-3 

15.4 

15.5 

15.6 

15.7 

16.0 

16.1-3 

16.4 

16.5 

16.6 

16.7 
• 17.0 



MNEMONIC 

OPERATION SECTION 

CODE NUMBER 



HLT 
SJ1 
SJ2 
SJ3 
SJ4 
SJ5 
SJ6 
RTJ 
UJP,I 
No Operation 
IJI 3.5 
No Operation 



3.5.5 
3.5.6 
3.5.6 
5.6 
5.6 
5.6 
5.6 
5.4 
5.1 



IJD 

AZJ,EQ 

AZJ,NE 

AZJ,GE 

AZJ,LT 

AQJ,EQ 

AQJ,NE 

AQJ,GE 

AQJ,LT 

ISE 

ISE 

ASE,S 

QSE,S 

ASE 

QSE 

ISG 

ISG 

ASG,S 

QSG,S 



3.5.7 
3.5.2 
3.5.2 
3.5.2 
3.5.2 
3.5.3 
3.5.3 
3.5.3 
3.5.3 
3.6.1 
3.6.1 
3.6.1 
3.6.1 
3.6.1 
3.6.1 
3.6.2 
3.6.2 
3.6.2 
3.6.2 



3.6.2 

11.1 

11.2 

11.3 

3.6.3 

3.6.3 

3.6.3 

8.2.6 

8.2.6 

3.8.2 

3.8.2 

5.3 

13.5 



QSG 

MEQ 

MTH 

SSH 

ISI 

ISD 

ISD 

ECHA 

ECHA, 

SHA 

SHQ 

SHAQ 

SCAQ 

NOP 

ENI 

ENA,S 

ENQ,S 

ENA 

ENQ 

No Operation 

INI 3.4.3 

INA,S 3.4.1 

INQ,S 3.4.2 

INA 3.4.1 

INQ 3.4.2 

No Operation 

XOI 7 

X0A,S 7 

XOQ,S 7 

XOA 7 

XOQ 7.5.3 

No Operation 



3.4.4 
3.4.4 
3.4.4 
3.4.4 
3.4.4 



5.4 
5.2 
5.3 
5.2 



OCTAL 

OPERATION 

CODE 



40 

41 

42 

43 

44 

45 

46 

47 

50 

51 

52 

53.01 

53.02 

53.04 

53.(0+b)0 

53.(0+b)3 

53.(0+b)4 

53.41 

53.42 

53.(4+b)0 

53.(4+b)3 

53.(4+b)4. 

54 

55.0 

55.1 

55.2 

55.3 

55.4 



17. 


1-3 


ANI 


7.4.4 


17. 


4 


ANA,S 


7.4.2 


17. 


5 


ANQ,S 


7.4.3 


17. 


6 


ANA 


7.4.2 


17. 


7 


ANQ 


7.4.3 


20 




LDA,I 


3.1.1 


21 




LDQ,I 


3.1.2 


22 




LACH 


8.2.1 


23 




LQCH 


8.2.2 


24 




LCA,I 


7.3.1 


25 




LDAQ,I 


5.1 


26 




LCAQ,I 


7.3.2 


27 




LDL,I 


7.2 


30 




ADA, I 


3.3.1 


31 




SBA»I 


3.3.2 


32 




ADAQ.I 


6.1 


33 




SBAQ,I 


6.2 


34 




RAD. I 


3.3.5 


35 




SSA,I 


7.6 


36 




SCA,I 


7.5.1 


37 




LPA,1 


7.4.1 



77.70 
77.71 
77.72 
77.73 
77.74 
77.75 
77.76 
77.77 



MNEMONIC 

OPERATION SECTION 

CODE NUMBER 



STA,I 

STQ,I 

SACH 

SQCH 

SWA, I 

STAQ,I 

SCHA,I 

STI,I 

MUA,I 

DVA,I 

CPR,I 

TMQ 

TMA 

AQA 

TIA 

TMI 

AIA 

TQM 

TAM 

TAI 

TIM 

IAI 

LDI,I 

No Operation 

ELQ 13 

EUA 13 

No Operation 



3.2.1 

3.2.2 

8.2.3 

8.2.4 

3.7 

5.2 

8.2.5 

3.2.3 

3.3.3 

3.3.4 

11.4 

9.3.1 

9.2.1 

9.5.1 

9.1.1 

9.4.1 

9.5.2 

9.3.2 

9.2.2 

9.1.2 

9.4.2 

9.5.3 

3.1.3 



.3.1 
,2.1 



55.5 


QEL 


13.3.2 


55.6 


AEU 


13.2,2 


55.7 


AQE 


13.4.2 


56 


MUAQ 3 1 


6,3 


57 


DVAQ,I 


6.4 


60 


FAD, I 


12.3.1 


61 


FSB, I 


12.3.2 


62 


FMU,I 


12.3.3 


63 


FDV,I 


12.3.4 


64 


LDE 


14.2.6 


65 


• STE 


14.2.7 


66 


ADE 


14.2.8 


67 


SBE 


14.2.9 


70.0-3 


SFE 


14.2.1 


70.4 


EZJ,EQ 


14.2.2 


70.5 


EZJ,LT 


14.2.3 


70.6 


EOJ 


14.2.4 


70.7 


SET 


14.2.5 


71 


SRC E, INT 


10.2.1 


71 


SRCN.INT 


10.2.2 


72 


MOVE, INT 


10.3 


73 


IN PC, INT, 
B,H 


20.6 


73 


INAC,INT 


20.8.1 


74 


INPW,INT, 
B,N 


20.4 


74 


INAW,INT 


20.8.2 


75 


OUT C, INT, 
B,H 


20.7 


75 


0TAC,INT 


20.8.3 


76 


0UTW,INT, 
B,N 


20.5 


76 


0TAW,INT 


20.8.4 


77.0 


CON 


20.2 


77.1 


SEL 


20.3 


77.2 


EXS 


20.9.1 


77.2 


COPY 


20.9.2 


77.3 


INS 


20.9.4 


77.3 


CINS 


20.9.5 


77.4 


INTS 


20.9.3 


77.50 


INCL 


21.2 


77.51 


IOCL 




77.52 


SSIM 


21.1 


77.53 


SCIM 




77.54-56 


No Operation 


77.57 


IAPR 




77.6 


PAUS 


10.4 & 



SLS 

SFPF 

SBCD 

DINT 

EINT 

CTI 

CTO 

UCS 



BY MNEMONIC OPERATION CODE 



21.1-2 

20.10.5. 

20.10.5. 



MNEMONIC 

OPERATION SECTION 

CODE NUMBER 



MNEMONIC 

OPERATION SECTION 

CODE NUMBER 



ADA, I 

ADAQ,I 

ADE 

AEU 

AIA 

ANA 

ANA,S 

ANI 

ANQ 

ANQ,S 

AQA 

AQE 

AQJ,EQ 

AQJ,GE 

AQJ,LT 

AQJ ,NE 

ASE 

ASE,S 

ASG 

ASG,S 

AZJ.EQ 

AZJ,GE 

AZJ,LT 

AZ J ,NE 

CINS 

CON 

COPY 

CPR.I 

CTI 

CTO 

DINT 

DVA.I 

DVAQ,I 

EAQ 

ECHA 

ECHA,S 

EINT 

ELQ 

ENA 

ENA,S 

ENI 

ENQ 

ENQ,S 

EOJ 

EUA 

EXS 

EZJ,EQ 

EZJ,LT 

FAD, I 

FDV,I 

FMU,I 

FSB, I 

HLT 

IAI 

IAPR 

IJD 

IJI 

INA 

INA,S 

INAC , INT 

INAW,INT 

INCL 

INI 

IN PC, INT, 

B,H 
INPW,INT, 

B,N 
INQ 
INQ,S 
INS 
INTS 
IOCL 
ISD 
ISE 

TOP 

ISI 
LACH 
LCA,I 
LCAQ.I 



3.3.1 

6.1 

14.2.8 

13.2.2 

9.5.2 

7.4.2 

7.4.2 

7.4.4 

7.4.3 

7.4.3 

9.5d 

13.4.2 

3.5.3 

3.5.3 

3.5.3 . 

3.5.3 

3.6.1 

3.6.1 

3.6.2 

3.6.2 

3.5.2 

3.5.2 

3.5.2 

3.5.2 

20.9.5 

20.2 

20 . 9 . 2 

11.4 

20.10.5.1 

20.10.5.2 

3.3.4 

6.4 

13.4.1 

8.2.6 

8.2.6 

21.1-2 

13.3.1 

3.4.4 

3.4.4 

3.4.4 

3.4.4 

3.4.4 

14.2.4 

13.2.1 

20.9.1 

14.2.2 

14.2.3 

12.3.1 

12.3.4 

12.3.3 

12.3.2 

3.5.5 

9.5.3 

3.5.7 

3.5.7 

3.4.1 

3.4.1 

20.8.1 

20.8.2 

21.2 

3.4.3 

20.6 

20.4 

3.4.2 
3.4.2 
20.9.4 
20.9.3 

3.6.3 
3.6.1 
3.6.2 
3.6.3 
8.2.1 
7.3.1 
7.3.2 



LDA,I 

LDAQ , I 

LDE 

LDIJI 

LDL,I 

LDQ,I 

LPA,I 

LQCH 

MEQ 

MOVE, INT 

MTH 

MUA,I 

MUAQ, I 

NOP 

0TAC,INT 

OTAW,INT 

OUTC,INT, 

B,H 
OUTW,INT, 

B,H 
PAUS 

QEL 

QSE 

QSE,S 

QSG 

QSG,S 

RAD, I 

RTJ 

SACH 

SBA,I 

SBAQ,I 

SBCD 

SBE 

SCA,I 

SCAQ 

SCHA,I 

SCIM 

SEL 

SET 

SFE 

SFPF 

SHA 

SHAQ 

SHQ 

SJ1 

SJ2 

SJ3 

SJ4 

SJ5 

SJ6 

SLS 

SQCH 

SRCE,INT 

SRCN,INT 

SSA,I 

SSH 

SSIM 

STA,I 

STAQ,I 

STE 

STI,I 

STQ,I 

SWA, I 

TAI 

TAM 

TIA 

TIM 

TMA 

TMI 

TMQ 

TQM 

UCS 

UJP,I 

XOA 

XOA,S 

XOI 

XOQ 

XOQ,S 



3.1.1 

5.1 

14.2.6 

3.1.3 

7.2 

3.1.2 

7.4.1 

8.2.2 

11.1 

10.3 

11.2 

3.3.3 

6.3 

20.8.3 
20.8.4 
20.7 

20.5 

10.4 & 

20.10.5.3 

13.3.2 

3.6.1 

3.6.1 

3.6.2 

3.6.2 

3.3.5 

3.5.4 

8.2.3 

3.3.2 

6.2 

14.2.9 
7.5.1 
13.5 
8.2.5 

20.3 

14.2.5 

14.2.1 

3.8.2 

5.3 

3.8.2 

3.5.6 

3.5.6 

3.5.6 

3.5.6 

3.5.6 

3.5.6 

8.2.4 

10.2.1 

10.2.2 

7.6 

11.3 

21.1 

3.2.1 

5.2 

14.2.7 

3.2.3 

3.2.2 

3.7 

9.1.2 

9.2.2 

9.1.1 

9.4.2 

9.2.1 

9.4.1 

9.3.1 

9.3.2 

3.5.1 
7.5.2 
7.5.2 
7.5.4 
7.5.3 
7.5.3 



CONTROL DATA 



n 



► »-CUT OUT FOR USE AS LOOSE-LEAF BINDER TITLE TAB 



CONTROL DATA 



CORPORATION 



03 
-i 

CO 

l\) 

03 
03 

03 
01 
O 
O 

O 
O 

> 
0) 
0) 

"0 

o 

Q 
> 



z 

G) 

H 

> 

Z 

Z 
G) 



> 

Z 
C 

> 

r 



CORPORATE HEADQUARTERS. 8100 34th AVE. SO.. MINNEAPOLIS. MINN, 55440 
SALES OFFICES AND SERVICE CENTERS IN MAJOR CITIES THROUGHOUT THE WORLD 



Pub. No. 60184200 
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